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SUMMARY OF AMENDMENTS 

FOR LY33-8042-6 

5740-SM1 

RELEASE 5, MODIFICATION 0 

• Improved performance when sorting 
variable-length records with new 
disk sorting technique {VLR- 
Blockset). 

• Ability to add to or change 
installed or passed user options, 
using the new OPTION control 
statement. 

• Support of the IBM 3375 direct 
access storage device for ini¬ 
tial input, final output, and 
intermediate work data sets. 


SUMMARY OF AMENDMENTS 

FOR LY33-8042-6 

5740-SM1 

RELEASE 4 

• A further standard disk sorting 
technique (Blockset) added to 
improve performance 

• The design point is changed 
from 32K bytes to 48K bytes 

■ SORTIN/SORTOUT I/O handling is 
enhanced to improve performance. 


SUMMARY OF AMENDMENTS 
FOR LY33-8042-5 
S740-SM1 

RELEASE 3 

NEW DISK SORTING TECHNIQUE 

A new technique. Vale, has been 
introduced. Its primary function 
is to extend the benefits of the 
Peerage technique to variable- 
length records. 


WORK DATA SETS 

• The sort program's work data 
sets can be on a mixture of any 
of the supported disk types. 

• If necessary, a secondary 
storage allocation is 


• Ability to produce statistical 
data about sort applications 
executed via the System Manage¬ 
ment Facility (SMF). 

• Ability to specify that format 
CH be translated the same as 
format AQ. 

• Ability to specify that record 
counters should or should not 
be checked at the end of exe¬ 
cution of sorting applications 
that use the E35 exit routine 
without a SORTOUT data set. 


" The default printing of the 
Sort specially formatted dump 
is removed. 

• Support of the IBM 3380 direct 
access storage device for ini¬ 
tial input, final output, amd 
intermediate work data sets. 


automatically made; this need 
not be specified in JCL. 

• Unused space is automatically 
released; this need not be 
specified in JCL. 

• Work I/O handling has been 
changed to give improved 
performance. 


LONGER INPUT RECORDS FOR DISK SORT 

Input records can be up to 32,760 
bytes long, regardless of whether 
work data sets are on tape or disk. 
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Preface 


This publication describes the functions and internal logic of the 0S/VS 
Sort/Merge Program Product, Program Number 5740-SM1. Its purpose is to 
aid IBM Program Service Representatives to understand the program and to 
locate and fix program faults. The reader should be familiar with the 
information contained in related publications listed below. 

This publication has six major parts: 

Section 1 . Introduction describes the program's structure and 
operational and physical characteristics and relates it to the operating 
system. 

Section 2 . Method of Operation contains method-of-operation diagrams 
and extended descriptions which detail the program's functions and 
relate them to specific code modules. 

Section 3 . Program Organization gives the physical organization of the 
program in main storage, as well as describing the interface between 
modules, and record movement. 

% 

Section 4 . Directories serves as a cross-reference between parts of the 
program and their description in the manual. 

Section 5 . Data Areas gives the layout of important data areas used by 
the program. 

Section 6 . Debugging Aids gives diagnostic and debugging hints under 
twelve headings, including how to decide whether a problem is due to a 
program error, how to add a temporary change to a program module, the 
origin of error messages, and how to effect simple bypasses. 

This publication also contains four appendixes: 

Appendix A. Program Exits 

Appendix B. Format Codes {Conventional Techniques) 

Appendix C. Checkpoint/Restart Facility 

Appendix D. Program Listing Standards and Conventions 


RELATED PUBLICATIONS 

0S/VS Sort/Merge Programmer's Guide . SC33-4035 
| OS/VS Sort/Merge Installation Guide, SC33-4034 


v 
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Section 1. Introduction 


The OS/VS Sort/Merge Program Product has three standard components: 

• Disk sort, which is reenterable 

• Tape sort 

• Merge only 

In addition it contains two conventional disk sorting techniques, 
normally not used. 

The total program is a generalized sort/merge program working as a 
processing program under the operating system. It can sort one.VSAM or 
QSAM data set, and can merge up to 16 VSAM or QSAM data sets. Each of 
the QSAM data sets may consist of a number of concatenated data sets, up 
to the system maximum. 

Input and output may be fixed or variable length, blocked or unblocked, 
and may be on any device supported by QSAM or VSAM. Output may be in 
VSAM form even if input is QSAM, as long as the output data set has 
previously been defined using the AMS utility. 

Most sorting applications need intermediate (work) storage, which may be 
on: 


• 2400 or 3400 series tapes 

• 2314 or 2319 direct access devices 

• 3330 series direct access devices (3330/3333, Model 1 and/or 
Model 11) 

• 3340 direct access devices 

• 3350 direct access devices 

• 3375 direct access devices 

• 3380 direct access devices 

• 3380 direct access devices and 3880 Models 2 or 3 with 

Speed Matching Buffer 

• 3380 direct access devices and 3880 Model 13 with Cache 

• 3850 MSS volumes 

Direct access device types can be mixed. 


Relationship to the Operating System 

The program communicates through macro instructions and interruptions 
with the operating system control program. 

For example, for input and output the data management EXCP, QSAM, BSAM, 
or VSAM routines can be used? the EXCP (or EXCPVR, SVS, and VS1 only) 
macro instruction is used for intermediate storage. I/O operations, and 
sometimes for input and output (EXCPVR is never used for input or 
output) ; and the linkage editor may be called to link-edit user-written 
routines to the program. 
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The program is designed to make use of the following facilities if they 
are included at system generation: Input/Output Recovery Management 
Support; Multiple Console Support; and (at the user's request) 

Checkpoint/R estart. 


Program Structure 


The program operates in four major phases, as indicated in 
Figure 1. 

The first part of Phase 0 will be covered here. This part 
reads and interprets program control statements, and selects 
the technique to be used. 

For a merge, there is only one technique. 


TAPE SORT TECHNIQUES 


If tape is specified for work areas, one of the conventional tape 
sorts (BALN, POLY, or OSCL) is used. The choice of technique 
depends solely on the numbers of work and input tapes specified. 

DISK SORT TECHNIQUES 

There are four standard disk sorting techniques available to the 
sort/merge program: 

• FLR-Blockset—fixed-length records 

• VLR-Blockset—variable-length records 

• Peerage—fixed-length records 

• Vale—both fixed- and variable-length records 

Sort/merge will select one of the Blockset techniques if all the 
conditions for its use are met (see "Conditions for Use of Blockset 
Sorting Techniques"). 

iDisk Sorting Techniques For Fixed-Length Records 

The sort/merge program's most efficient fixed-length record 
technique, FLR-Blockset, will be used for most sorting applications, 
providing the conditions listed in "Conditions for Use of Blockset 
Techniques" are met. If one or more of the conditions for the FLR- 
Blockset technique are not met, the Peerage or Vale technique will 
be used, where possible. 

Disk Sorting Techniques For Variable-Length Records 

The high-performance VLR-Blockset technique will be used for sorting 
variable-length records if all the requirements listed in the follow¬ 
ing section are fulfilled. If not, the current variable-length disk 
sorting technique. Vale, will generally be used. 

To enable sort/merge to attempt to select the best technique, whether 
VLR-Blockset or Vale, the following guidelines may be useful. If the 
average length of variable records is more than 350 bytes, you should 
specify the L5 operand on the RECORD control statement. If you specify 
an L5 operand that is between 350 and 1,000 bytes, Sort uses the Vale 
technique when the ratio of region size to number of records is large. 
When L5 is greater than 1,000 bytes. Vale is generally used. If the 
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working storage is less than 100K bytes, sort/merge will attempt to 
select VLR-Blockset regardless of average record length. If you don't 
specify L5, sort/merge will try to use VLR-Blockset. 

When used, the new VLR-Blockset technique will generally show process¬ 
ing time improvement over Vale. 

CONDITIONS FOR USE OF BLOCKSET SORTING TECHNIQUES 

The sort/merge program has two high-performance disk sorting techniques, 
FLR-Blockset and VLR-Blockset, for fixed- and variable-length records, 
respectively. The program will first attempt to use one of these tech¬ 
niques, providing the following conditions are fulfilled. If they are 
not, then one of the other standard disk sorting techniques, Peerage or 
Vale, may be used where possible (Peerage or Vale for fixed-length 
records; Vale for variable-length records). 

The first list below includes conditions common to both techniques. The 
second list includes conditions relevant to FLR-Blockset only, and the 
third, to VLR-Blockset only. 

Conditions Common To Both Blockset Techniques 

e More than about 64K bytes of main storage plus additional storage 

for buffers are available for sort and other possible modules in the 
region/partition. The larger the input/output block sizes are, the 
larger main storage must be. 

e No program exits other than El 5 and/or E35 (without overlay structures) 
provided they are pre-linkedited. 

e If a SORTCNTL DD statement is used, no control statements other than 
OPTION should be included. 

• Tape work data set is not specified. 

e Under MVS, up to 26 dynamically allocated sort work data sets may be 
used, depending on the complexity of the control field and use of 
SMF. 

e Input or output is not a VSAM or an ASCII data set, or track overflow 
record format (RECFM=FT). 

• Input is not a direct-access data set with key sequenced organization 
(BDAM). 

e Input or output must not be a spool or a dummy data set. 

e Output cannot be padded or truncated records, or an old data set re¬ 
siding on tape. 

e Multivolume disk data output is not requested, 
e Checkpoint is not specified, 
e Control fields that do not exceed 248 bytes. 

• Control fields that do not cause the intermediate record to expand 

by more than 30% of the total record length. Factors that might expand 
the record are overlapping fields, decimal fields, fields that require 
translation, or specification of EQUALS. 

e All supported control field formats except those with leading, trailing, 
overpunched, or separate signs, or ASCII format control fields. 

e Skipping of input records is not requested. 
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FLR-Blockset Conditions 


• SORTIN record length plus 13 bytes and any additional bytes caused by 
control field expansion must not exceed the smallest SORTWK track 
capacity or 32K bytes, whichever is smaller. 

• Record length is not to be changed by program exit El 5 and/or E35. 

• SORTWK data sets must be allocated in cylinders (MVS only). 

VLR-Blockset Conditions 

VLR-Blockset minimum storage requirements are defined by the following 
computations (whichever results in the larger value should be used, but 
in no case should less than 69K bytes be used): 

• In computing the amount of storage necessary to execute VLR- 
Blockset, use whichever of the following computations resulting in 
the largest value: 

1. 48K bytes of main storage plus the largest of three times: 

a. the maximum input block size, or 

b. the maximum output block size, or 

c. 2000 bytes. 

2. 48K of main storage plus four times the size of the maximum 
record length, plus the largest of the following: 

a. the maximum input block size, or 

b. the maximum output block size, or 

c. 2000 bytes. 

• Maximum record length does not exceed the track length for the SORTIN 
or SORTOUT disk data set, or 32,000 bytes, whichever is smaller. 

• Input or output is not spanned, variable-length records. 

• Input or output is not Format D records (variable-length ASCII 

tape records). 

• Work data sets are specified (a sort in main storage is not supported). 

• The sort/merge program is not dynamically invoked by IMS/VS for 
variable-length record sorting applications. 

• The control field does not overlap the record descriptor word (RDW). 

• If the ratio of region size to the number of input records is large, 

and if the L5 operand specified on the RECORD control statement 

is greater than 350 bytes, sort/merge may, in some cases, choose 
to use the Vale technique. If L5 is not specified, sort/merge will 
execute VLR-Blockset if all other conditions are met. 
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Program Structure 


As shown in Figure 1, the program operates in four major phases. The 
first part of Phase 0 reads and interprets program control statements# 
and selects the technique to be used. 

For a merge there is only one technique. 


TAPE SORT TECHNIQUES 


If tape is specified for work areas one of the conventional tape sorts 
(BALN# POLY# or OSCL) is used. The choice of technique depends solely 
on the numbers of work and input tapes specified. 


DISK SORT TECHNIQUES 


For a disk sort the program selects one of three standard techniques: 
BLOCKSET, PEERAGE# or VALE. 

The program's most efficient technique# BLOCKSET will be used for most 
sorting applications fulfilling the following conditions: 

• Fixed-length records up to the length of the smallest SORTNK disk 
track size 

• More than about 60K bytes of main storage available for sorting and 
possible modules in the region/partition 

• No program exits other than E15 and/or E35, provided they are 
prelink-edited 

• Input or output is not : 

- VSAM data set 
ASCII data set 

Data set with track overflow record format (RECFM-F3) 

- Direct access keyed sequenced data set 

Residing on a device type not supported as a sort work area 

- Spool data set or dummy data set 
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If these conditions are not met, the program will attempt to use 
Peerage or Vale. Peerage is normally used if the following criteria 
are met: 

• Fixed-length records 

• Record length no greater than track length 

• No exits to be activated other than E15, E18, E35, E39, or E61 

• Control word not too long (see note) 

Note: No figure can be given for how long the control word can be if 
the Peerage technique is to be used; it depends on many variables, such 
as device type for work storage and amount of main storage available 
for buffers. However, the length limit is unlikely to be reached before 
256 bytes, and will usually be considerably higher. 

If any one of the conditions mentioned above is not satisfied, the 
program will attempt to use Vale. 

The user should not normally need to be aware that these different 
techniques exist. In the OS/VS Sort/Merge Programmer's Guide , they 
are collectively referred to as the "standard disk technique." However, 
it is possible to specify, when the program is installed or in the 
OPTION or DEBUG statement on execution, that a Blockset technique 
should not be used. 

An informational message (ICE092I or ICE093I) states which of the 
standard disk techniques has been used. 

The conventional disk sorts supplied with the program (BALN and CRCX) 
can be forced by a parameter of the DEBUG statement. Care should then 
be taken that the SORTWK requirements for the forced technique have 
been met. For information on these requirements, refer to the OS/VS 
Sort/Merge Programmer's Guide. 
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*lf all records fit in main storage or just 1 string of data written on SORTWKs, the key handling is bypassed. 


Figure 1. Phases of the Program 
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Operational Considerations 


The program may be initiated by an EXEC statement or invoked from a 
processing program, as shown in Figure 2. 



’If sort/merge is called by any type of LOAD and BALR interface, the 
invoking program is overlaid. 

Figure 2. Initiation of the Program 


For an EXEC sort or merge, control information is supplied via the 
following control statements in SYSIN: SORT, MERGE, OPTION, RECORD, 

MODS, ALTSEQ, DEBUG, and END. 

For a sort or merge invoked from an assembler-language program, 
control information is supplied in a parameter list and SORTCNTL. 

For COBOL and PL/I, additional information may be passed via the 
SORTCNTL data set. 

Figure 3 gives an example of the use of the ATTACH macro instruction. 

User routines for use at program exits may be located in partitioned 
data sets defined by the user in the MODS statement, or may be in SYSIN, 
in which case they are copied into the SORTMODS data set. The user 
defines link-editing requirements: none, separate, or together with 
other routines for the same phase. 
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LA 1,PARLST LOAD ADDR OF PARAM POINTER IN R1 

ATTACH EP=SORT INVOKE SORT 


PARLST DC X* 80 *,AL3 (ADLST) POINTER FLAG/ADDRESS OF PARAM LIST 



CNOP 

2,4 

ALIGN TO CORRECT BOUNDARY 

ADLST 

DC 

AL2 (LISTEND-LISTBEG) 

PARAM LIST LENGTH 

LISTBEG 

DC 

A (SORTA) 

BEGINNING ADDRESS OF SORT STMT 


DC 

A (SORTZ) 

END ADDRESS OF SORT STMT 


DC 

A (RECA) 

BEGINNING ADDR OF RECORD STMT 


DC 

A (RECZ) 

END ADDR OF RECORD STMT 


DC 

A (MODI) 

ADDR OF E15 RTN 


DC 

A (MOD 2) 

ADDR OF E35 RTN 


DC 

C'ABC#' 

DDNAME CHARACTERS 


DC 

X'OO' 

OPTIONAL MAIN STORAGE FLAG BYTE 


DC 

X’OIAOOO' 

OPTIONAL MAIN STORAGE IN HEX 


DC 

X’FF* 

MESSAGE OPTION FLAG BYTE 


DC 

C* (U) * 

MESSAGE OPTION 

LISTEND 

EQU 

* 


SORTA 

DC 

C* SORT FIELDS®(10,15 

,CH,A) ,’ SORT CONTROL STMT 


DC 

C*FILSZ=4780" 

(CONTINUED) 

SORTZ 

DC 

C' • 

DELIMITER 

RECA 

DC 

C* RECORD LENGTH®100, 

TYPE=F* RECORD CONTROL STMT 

RECZ 

DC 

c* • 

DELIMITER 

MODI 

DS 

OH 

(routine for exit El5) 


USING *,15 


MOD2 

DS 

OH 

(routine for exit E35) 


USING *,15 



Figure 3. Initiation Via the ATTACH Macro 
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Physical Characteristics 


| When a standard disk technique is used, the program is reenterable. 

MAIN STORAGE 

The program needs a minimum of 48K bytes of main storage. If 
performance is a consideration you should allocate at least 72K bytes, 
and preferably between 128K bytes and 512K bytes. 

The program will make use of all available main storage in the partition 
or region if SIZE (MAX) is in effect; this can be specified either at 
installation or at execution. The MAXLIM parameter should have been 
specified at installation time: this sets an upper limit to the amount 
of space which the program can use. If it has not been specified, and 
SIZE (MAX) is used in a very large virtual partition or region, 
performance will usually deteriorate and deactivation may result. 

I LIBRARIES 


There are two link libraries designated for your sort/merge program— 
one containing the reenterable routines, and the other containing 
non-reenterable initiating routines. In addition, a sort library 
containing all other sort/merge routines as well as space in the 
system SVC library is designated when jou are using any sort applica¬ 
tion with tape work areas or any merge application, or if any of 
the nonstandard disk techniques are forced. If sort/merge cataloged 
procedures are used, space in a procedure library is also designated. 

System Libraries 

The system libraries usually used are shown in Figure 4. In addition. 
Figure 5 shows how the data sets are used during execution of sort/ 
merge. 


System Libraries 


Link library 
(reenterable modules) 

Link library (non- 
reenterable modules) 

Sort library 
SVC library 
Procedure library 

| Figure 4. System Libraries 

I lf SYS1.PROCLIB is used for procedures, any earlier SORT or SORTD 
procedures (SM-023 or 5734-SM1) should be scratched. 

I Private Libraries 


VS1 (also 
MVT, MFT) 

SYS1.LINKLIB 

SYS 1.LINKLIB 

SYS1.SORTLIB 
SYS 1.SVCLIB 
SYS 1.PROCLIB 


SVS, MVS 

SYS 1.LPALIB 

SYS 1.LINKLIB 

SYS1.SORTLIB 
SYS1.LPALIB 
SYS 1.PROCLIB 


If you have more than one operating system and use private libraries, 
only one set of modules is needed (except for the SVC routine, which 
is dependent on the system under which you are running; it must always 
be in a system library). 

DATA SETS 


Temporary data sets are used at execution time. These are illustrated 
in Figure 5. 
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Figure 4. The Installation Procedure 
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SYSIN or 
SORTCNTL 
(Control 
statements, 
user routines) 


SORTIN 
(input data set 
to a sort) 




SORTINnn 
(2-16 input 
data sets to a 
merge) 


^ BEGIN ^ 


I 


Phase 0 
Routines from 
SYS1.LINKLIB or 
SYS1.LPALIB 


SYSLIN 
Control stmnts 
for linkage 
editor 


OlsORTMODS 


Linkage 

editor 


User routines 
from SYSIN 


Phase 1 
Routines from 
SYS1.SORTLIB 
(non-standard 
disk or tape 
technique), or 
SYS1.LINKLIB 
or SYS1.LPALIB 


(§r 


SYSLMOD 
(link edited 
user routines) 


SORTWKnn 
(0-100 work 
datasets) 


Phase 2 
Routines from 
same libraries 
as phase 1 


Phase 3 
Routines from 
same libraries 
as phase 1 




SORTOUT 
Output data set, 
sort or merge 


Figure 5. 


Data Sets Used Only During Execution 
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Section 2: Method of Operation 


This section gives a functional description of the sort/merge program* 
with cross references to other parts of the manual. It also provides an 
entry into the microfiche by showing which modules perform which 
function. It does not, however, describe in detail the various 
techniques used by the program. 


How the Section Is Organized 


The section contains information in four forms: 

1. A hierarchical overview of the functions of the program. Figure 6, 
which also serves as a table of contents to the diagrams. 

2. The Method of Operation (MO) diagrams, each describing a function 
of the program in the form input-process-output. 

3. Extended descriptions accompanying each lowest-level diagram. 

4. Module tables accompanying each lowest-level diagram for 
conventional techniques, showing which modules perform which 
function. For peerage and vale modules this information is 
included in the extended descriptions. 


How to Use the MO Diagrams 


To find the diagram you need, refer to the overview (Figure 6). 

The diagrams are arranged with the processes (functions) listed and 
numbered in the central block. Start reading in that block, and refer 
to the left-hand column to find input to each function, and the 
right-hand column for output. The extended descriptions give more 
detailed information. 


REFERENCES TO DATA AREAS 


| The program makes extensive use of a large data area. For Blockset, the 
I area is called COMMON. See Section 5 for the area layout. For Peerage 
| and Vale appplications the area is called COMMA, and its layout can be 
I found in Section 5. For other applications the information in COMMA is 
moved in Phase 0 to a 'control phase information area', the CPI, and 
thence to a 'phase-to-phase information area', the PPI, the DSECT for 
which resides in module ICERCA. 

t Virtually all parts of the program use COMMON, COMMA, or the PPI. This 
j is not therefore normally shown in the MO diagrams; exceptions Eire made 
| when for example updates to COMMON, COMMA, or the PPI, form the major 
I output from a function. 
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The data areas themselves are described in detail in Section 5 of this 
publication. To find which specific fields are referenced by a 
particular CSECT, see the cross-reference list in the relevant 
| microfiche. To find which modules reference a specific field, see the 
cross-reference tables in Section 6. 


| SYMBOLS USED 


Processing sequence 

Entry into a diagram is shown from the previous diagram 
on the same level; if none exists, the next higher level 
is shown. Exit from a diagram is shown in the same way. 


Data movement 
For example: 




Area 1_ _ Area 2 







Record A 

-^ 

ProcenX 

: 

Record A 

1/^ 

V 



Process X moves record A from area 1 to area 2. 
Input buffer Output buffer 



Process 1 moves records from an input buffer to an output 
buffer. Process 2 moves them from the output buffer to a 
SORTWK data set. 


Output buffer SORTOUT 



Process A moves records from an output buffer to the 
SORTOUT data set. It also passes control to any user 
routine present at exit E35, which may also move records 
to SORTOUT. 
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^ Pointer - the field from which the arrow originates 

contains the address of the field or area to which the 
arrow points. This symbol is also used in the extended 
descriptions to the diagrams, as follows: '...Exit Name 
Table (tPPIAPGC means that a pointer to the Exit Name 
Table can be found in PPIAPGC. 


— - -p Data Reference - the process block from which the arrow 

originates accesses the information in the area to which 
the arrow points, without modifying it. 



Diagram Reference - the functions in the process block 
are described in greater detail in diagram N. 


How to Use the Module Tables 


Function 


Relates to a function in the process column of the relevant diagram. To 
find which module carries out the function, follow across to the next 
column. 


Conditions 


Work from left to right choosing the conditions which apply to your 
application. 


Mod 


Gives the last three or four letters of the name of the module which 
carries out the function. A directory of modules is given in Section 4. 

When a running module carries out a function it alone is referenced, 
though the corresponding assignment module is of course also necessary 
to the function. When an assignment module actually carries out the 
function, it alone is referenced. See Section 4 for more information on 
assignment and running modules. 


ABBREVIATIONS USED IN MODULE TABLES 


Fix 
Var 
Exit 
NO E 
256+ 

<256 

Mult 

Extract 

Spanned 

Forward 

Backward 


fixed-length records 
variable-length records 
one or more program exits activated 
no program exits activated 
records of 256 or more bytes 
records of less than 256 bytes 
a multiple compare routine used 
an extract compare routine used 
output consists of spanned records 
(forwd) read tape forward 
(back) read tape backward 
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Figure 6. Table of Contents for Method of Operation Diagrams 
Hierarchical Overview of Program Functions 
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1 


Sort/Merge 












Extended Descriptipn for Diagram 1 


1. Analyze control information 

| Determine whether the application is 
j a Blockset, Peerage, or Vale 

| technique sort, or a conventional 

j technique Sort or Merge. 

initialize for the appropriate 
application. 

I 2. Blockset sort 

| Sort input into ordered strings, 

j attempting to limit the key range of 
j cylinders. 

| Create optimal virtual block sets 

I from physical blocks on work file 

j cylinders. 

| Merge virtual blocks to produce final 

j output. 


3. Peerage or Vale sort 

Sort input into ordered strings, 
using the replacement selection 
I technique. 


For Peerage, partition the work 
files. The partitioning technique is 
shown in MO diagram P3.2. 

| Reduce the number of strings. 

Merge the strings to produce final 
output. 


*». Conventional Sort 


Sort input into ordered strings, 
using the replacement selection 
j technique. 

| Reduce the number of strings. 

Merge the strings to produce final 

output. 

Merge 

Merge the input files to produce 
| final output. 
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Extended Description for Diagram D2 


1. Process program options (default and 
specified) , JCL information, and 
program control statements. 

Optimize control field 
specifications. 

Check Blockset technique criteria 
(listed in Section 1 under * Program 
Organization') . 

2. Initialize for Blockset : 

Generate code to handle control 
fields. 

Make the program reenterable. 

Set up control block areas. 

Optimize. 


3. Process program options (default and 
specified) , JCL information, and 
program control statements. 

Optimize control field 
specifications. 

Check Peerage technique criteria 
(listed in Section 1 under 'Program 
Organization') to determine whether 
this is a Peerage technique sort; if 
the criteria are not met, check Vale 
criteria (also listed in Section 1). 


4. Initialize for Peerage or Vale Sort : 

Generate code to handle control 
fields. 

Make the program reenterable. 

Set up control block areas. 

Optimize. 



Optimize. 
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D3.1 


Analyze and Initialize for Peerage or Vale 


D2 


Program options j 

— specified in ICEMAC 
macro when the 
program installed 

— specified via PARM 
in EXEC statement, 
or parameter list 


DD statements and 
system control blocks 


Control statements (in 
SYSINorSORTCNTL, 
or pointed to by 
parameter list) 





1 . 

Process control information 


2. 

Generate code to handle control fields 


3. 

Make the program reenterable 


1 

Set up control block areas 


5. 

Optimize 


6. Allocate SORTWK data sets 
dynamically under MVS 


Register 13 


Communi¬ 
cations area 
(COMMA) 


















Extended Description for Diagram D3.1 


Module 


1 - a. Check generated defaults (stored 
in Module ICEAM1, described in 
Section 5) . 

Scan FARM field parameters from 
EXEC statement, or (for an invoked 
sort) the parameter list, pointed 
to by register 1. 

Check that no invalid options 
selected. 

Make appropriate entries in the 
PPI (see the 'Index to PPI Fields' 
in Section 5) . 

b. Check that necessary DD statements 
are present, and are not 
duplicated. 

Open SORTIN, SYSOUT, and SYSIN or 
SORTCNTL data sets, and check for 
valid DCB parameters. 

c. Read program control statements, 
from SYSIN, from SORTCNTL, or 
from addresses given in the 
parameter list. Check the state¬ 
ments for correctness and 
completeness. 

2. Generate in main storage a routine 
for transposing records before 
sorting them, and for restoring them 
to their original format after 
sorting them. 


Module 

Move code which is not reenterable to DEG 
a reserved area: 

- tree handling routines 

- special code 

Create a control block area for each DEG 
SORTWK data set. The area holds IOB, 

DCB, ECB, link fields, and other 
information. 

Determine: dev 

- no. and type of input buffers 

- internal blocksize 
index size 

- maximum M for phases 2 and 3 

Optimize the use of the intermediate 
storage data sets. 

Optimize the mix of SORTIN/SORTOUT DEV 

buffers and SORTWK buffers, given the 
way in which the files are allocated, 
the data transfer rate of the 
devices, etc. 

Allocate the number of specified (or DEG 

defaulted) work areas with the space 

calculated or using the system's 

default value. Reallocate VIO data 

sets with a DSNAME specified, if 

required. 
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D3.2 


Initialization for Gonvontional Techniques 


D3.1 



N3.1 (sort) 
N3.3 (merge) 
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| Extended Description for Diagram D3.2 


1. Move information from the 
communications area to the CPI. 
Release the communications area. If 
SIZE (MAX) is in operation, calculate 
how much virtual storage is available 
for sorting purposes, and note the 
amount in the CPI. The CPI is 
described in Section 5. 

2. If user routines are present: 

a. Copy any routines in SYSIN to 
SORTMODS. 

b. If necessary, prepare linkage 
editor control statements, and put 
them in SYSLIN. 

c. If necessary, create a parameter 
list for the linkage editor. 

d. Build an exit name table for exits 
that do not require further 
linkage editing. 

3. a. Transfer the information in the 

| CPI to the PPI. The PPI is 

j described in Section 5. 


'permanently generated core* area, 
to contain the exit name table, 
the format track table, and the 
control field handling routine. 

c. Generate the appropriate control 
field handling routine. 


4. For a Sort 

a. Choose the sequence distribution 
technique to be used. 

b. Calculate bin size. 

c. Calculate variables: 

- b (sort blocking) and G (RSA 
capacity) 

- maximum M (defined in Section 3 
under 'Phase 2') 

- the number of input and output 
buffers to be used. 

For a Merge 

d. Determine the number of input and 
output buffers to be used. 


b. Get the storage necessary for the 
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| Module Table for Diagram D3.2 


Function 

Conditions 

Mod 

1 Create CPI 

Always 

BCM 

2a Copy rtns 

Always 


b Link ed. stmts 

Always 

RCP 

c Parameter list 

Always 

^>4 

d Marne table 

Always 


3a Create PPI 

Always 

RC1 

b Get storaqe 

Always 

RC1 

c Gen multiple rtn 

Always 


Gen extract (1) 

Always 


Gen extract (2) 

E61 activated* 

|;TlH 

Otherwise 

AO 4 




FOR 

4a Choose technique 

Tape 


RCS 




BGA 


Disk 


RCN 

b Calc bin size 

(As for 4a) 


c Calc variables 


(As for 4a) 




BALM 



■■■ 

CRCX 


d Calc no. of merge 




buffers 

Always 


RCL 


♦And/or control fields of type AC,AQ,CLO,CSL # CST. 
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Extended Description for Diagram B2 


to 

i_n 


1. Read input via input buffers into the 
RSA (Record Storage Area). 

FLR: If end of SORTIN is reached when 

few or no blocks have been written to 
SORTWK, bypass the key handling phase. 
Otnerwise, write records to SORTWK to 
make room for new records to be read 
into the RSA. Index the blocks 
written to SORTWK. 

VLR: Write records to SORTWK to make 

room for new records to be read into 
the RSA. Collect record length data to 
use in computing bin size. Index the 
blocks written to SORTWK. At end of 
SORTIN, write remaining records to 
SORTWK and all index records. 

2. VLR Generation Phase: Compute bin size 
and generate code used by output phase 
to restore records. 


| 3. Sort the indexes created by the 
SORT phase, and create optimal 
virtual block sets (physical blocks 
on same cylinder) for the merge 
phase. 

| 4. Merge virtual block sets to create 
the output data. 

|5. Terminate: 

Print information messages. 

Close files used. 

Free storage used. 
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Initialize Sort 


COMMON 



1. Read input 


SORTIN 
(and/or El5) 


2. Whenever RSA full, select records 
and write to SORTWK. 

Create indexes. In addition, for 
VLR, collect length data. 


SORTWK 



3. On end of input: FLR : Check 
amount written to SORTWK. 
VLR : Write remaining records 
to SORTWK. 


Indexes 


Many blocks 

FLR only: 

written or 

Few or no 

VLR 

blocks written 

-■_ 
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Extended Description for Diagram B3.1 


ro 

-j 


1. Get input records and store, 

I partially sorted, in the Record 
Storage Area (RSA). 

2. a. From partially sorted RSA records 

select an output block continuing 
I output string, or if no records 

for current output string begin a 
new one. 

b. Select a cylinder on SORTWK data 
I sets such that the keys in the 



Module 


block to be written are close to 
keys already written on cylinder. 

c. Write selected records to SORTWK, IPUB 

freeing RSA space for more input IPVB 

records. 

d. Make block indexes IPUB 

FLR: If no SORTWK space or one IPUT 

string of data written to SORTWK, 
skip the key handling phase and 
go to Merge phase. 

VLR: At input end of file, write IPVT 

remaining records and indexes to 
SORTWK. Call ICEGENV to initial¬ 
ize code for the OUTPUT phase. 
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» 


2. Optimize for merge phase 


3. Build block set indexes 


COMMON 
















Extended Description for Diagram B3.2 


1. Sort the indexes by recursive 

I application of the writeback merge 
algorithm of the merge phase. 

2. Determine virtual block set size, 

I optimize for next phase: 

FLR: If the number of strings 
i created by sort is small enough 
to allow merging without write¬ 
back, largest possible block set 


Module 


Module 

KPUS 

size is selected. 


KPVS 

Otherwise a smaller block set size 
is selected. 

KPUV 

KPUT 

KPVT 

3. Create virtual block indexes: 

KPUV 


l Process indexes of physical data 

KPW 

KPUV 

blocks in key order, and group those 
on same cylinder with key values 
sufficiently close together to form 
virtual block sets. 



to 

VD 
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Operating system or 
calling program 
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Extended Description for Diagram B3.3 


1. Obtain (next) input virtual block 
index. 

If necessary read indexes from 
SORTWK, and/or build new virtual 
block indexes from writeback physical 
block indexes. 

If enough space in RSA for a buffer 
full of input, continue. Otherwise 
skip point 3. 

2. Read data blocks. 

Obtain disk addresses of virtual 
block set and read those in optimal 
order into input buffers. 


3. Unload input buffers into RSA. 

Return to point 1. 

If enough space can be created by 
moving RSA records to output, skip to 
point 5. 


4. Select records from input buffers and 
RSA to form part of a writeback 
string, and write the string to 
SORTWK in the same way as during 
phase 1 (sort) : 

Select suitable writeback cylinder, 
and create indexes for writeback 
blocks. 


Module 


OPUT 

OPVT 


OPUT 

OPVT 


OPUA 

OPVA 


OPUT 

OPVT 


If necessary spill indexes to SORTWK 
index blocks. 


5. Transfer records to output. If RSA 
and input buffers empty, finish 
processing. Otherwise return to 
point 3. 


6. Build and write SMF record if 
requested (VSl, MVS only). 


Module 


OPUA 

OPVA 


EXIO 

OXOV 


Licensed Material—Property of IBM 
Page of LY33-8042-6, As Updated 31 March 1981, By TNL LN20-9345 























Extended Description for Diagram P2 


1. Read input via input buffers into the 

| RSA (Record Storage Area). 

If end of SORTIN is reached before 
the RSA is full, SORTOUT can be 
written immediately. The tree is 
| used to select records for output. 

Otherwise records are written out to 
SORTWK to make room for new records 
to be read into the RSA. For Peerage 
the blocks written to SORTWK are 
| indexed. 

Peerage 

2. Sort the indexes, as described in MO 
diagram P4.21. 

If the number of logical strings is 
<maximum M for phase 3, control is 
passed to the final merge (shown in 
MO diagram P3) . M (merge order) is 
explained in Section 3 under 'Phase 
1 '. 

If there are more strings, an 
intermediate merge pass is needed. 

Partition the blocks on SORTWK, and 
arrange the indexes to reflect the 
partitioning, as described in MO 
diagrams P4.22 and P4.23. 

3. Merge all partitions except partition 
0, creating new strings on SORTWK. 


Return control to point 2. 

4. All strings are now in partition 0. 

Merge partition 0 to produce the 
output data set. 

Vale 


2. (Not used.) 

3. Merge as many strings as possible (M 
for phase 2) . Repeat until the 
number of strings is £ phase 3 merge 
order. 

4. Merge the remaining strings to 
produce the output data set. 
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Sort 




Output file 
(SORTOUTand/ 
or to E35) 









Extended Description for Diagram P3.1 


1. Initialize buffers, RSA and tree, and 
SORTIN. 

Move records into the RSA and update 
the tree for each record. 

Continue until the RSA is full (or 
end of SORTIN is reached) . 

2. If end of SORTIN is reached before 
the RSA is filled, write the output 


file. 

3. Otherwise, intialize SORTWK data 
sets. 

Create strings of records (and, for 
Peerage, indexes) for each output 
block. 

4. Write the strings (and indexes) to 
SORTWK. 






COMMA 










u> 


Extended Description for Diagram P4.11 


1. Allocate and initialize buffers for 
SORTWK data sets. Chain the buffer 
areas together. Allocate and 
initialize buffers used for SORTIN. 
(The same buffer area is used for 
SORTOUT if written in this phase.) 

2. Allocate all remaining main storage 
to the RSA and tree. Chain bins in 
the RSA. 

3. Initialize addresses for GET and EOF 
routines. Load phase 1 routines if 
specified. 

4. Get a record (from the input buffer 
or from El5) . 

Transpose the record. 

Put the record in the next vacant bii 
in the RSA. 

Put the address of the record in the 
correct place in the tree. 


\ I 

{ Module f 

\ ! 

j CRE/VRE j 


CRE/VRE 


| CRE/VRE 

| CRE/VRE* 
1 DEG* 

| DEG* 


Repeat until the RSA is full 


If EOF is reached before the RSA has 
been filled, the records do not need to 
be written to a SORTWK file. Instead, 
the SORTOUT file is written, using the 
tree to locate successive winner records 
in the RSA. 


*The code is generated outside CRE/VRE*s 
area; the source code is held in 
ICEDEG. 
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Extended Description for Diagram P4. 12 


1. a. Allocate and initialize buffers for 

SORTOUT. Initialize address for 
the appropriate put routine. Load 
E35 routine (if any). 

b. Open SORTOUT if it is not a VSAM 
data set. Close the SORTIN data 
set. 

2. Use the tree to locate the winner 
record in the RSA. 

w j 3. Restore the record to its original 

format. Move the record to the output 
buffer (or pass it to the E35 
routine). 

4. a. If VSAM, put the record to SORTOUT. 

b. If non-VSAM, repeat 2 and 3a until 
the output buffer is full. Write 
I the buffer contents. 

^ Repeat points 2-4 until the RSA is empty. 


\ ' 1 
j Module l 

f ~~ 1 

J CRO/VRO f 


| *CRO/VRO j 

| CRO/VRO j 

| CRO/VRO/XCP| 


•The code which carries out these 
functions is generated outside 
ICECRO/VRO's area, and resides in ICEDEG. 
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Create and Distribute Strings 
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Extended Description for Diagram P4.13 




I 1. Set EOF and PUT routine addresses. 

I 2. Move the winner record from the RSA to 

I the output buffer. 

I Read the next record from the input 
buffer. 

Transpose the record. 

• Move the record to the bin in the RSA 
from which the previous winner was 
moved. 

Update the tree. 

3. a. Not used for Vale. Create a start 
index for the logical block, using 
the control word from the record in 
the output buffer. Put the index 
in the output buffer for indexes. 

I b. Repeat point 2 until the output 
buffer is full. 

c. Write the block to SORTWK. 

d. Not used for Vale. Create an end 
index for the logical block, using 
the control word from the last 
record moved to the output buffer. 
Put the index in the output buffer 

I for indexes. 

e. Not used for Vale. Repeat points 2 
and 3a-e until the end of a string 
is reached. At end of string, make 
up a complete logical block,, i.e. 
fill the last track with dummy 
physical blocks, so that the next 
string will begin a new track. 


j Module 
j Peerage 

1 CRE 
| CRE 
1 CRE 

| CRE 

1 DEG 

| CRE 

| CRE 

I CRE 


CRE 


Repeat points 2 and 3 until EOF is 
reached. 




Vale 

———, 
VRE/VRN 
VRE/VRN 
VRE/VRN 

VRE/VRN 

DEG 


VRE/VRN 
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P3.2 


Partitioning 


P3.1 



P3.4 P3.3 
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Extended Description for Diagram P3.2 


■p 

u> 


Peerage only (not used for Vale!) . 

1. Read the indexes. Sort them into 
strings, index the strings, in the 
same way as record strings are 
indexed. Write the indexes to SORTWK. 
If necessary, merge the higher levels 
of indexes, until the original indexes 
are all in one string on SORTWK. 

2. In calculating the number of logical 
strings, physical strings are ignored: 
only logical blocks are considered. 

The basis of the algorithm used is 
that two physical blocks whose 
contents overlap must necessarily 
belong to different logical strings. 
Two blocks whose contents do not 
overlap, however, can be included in 
the same string. The indexes can be 
used to determine whether or not 
blocks overlap, since they contain the 
control words of the highest and 
lowest records contained in the block. 

3. Assign each logical block of records 
to a partition (partitions 0 to n), as 
described in P4.22. Put the assigned 
partition number into each index. 
Partitioning is a form of priming for 
the following merge step. It enables 
the merge to read in blocks in the 
most efficient order, to keep the 
number of merge passes to a minimum. 

4. Sort the indexes (as in point t) , 
using the partition number as the 
first control field. 


j Module 
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Extended Description £or Diagram P4.21 


Peerage only (not used for Vale) 

1. Read in the indexes. 

2. Sort the indexes, in the same way as 
records are sorted in phase 1 (see HO 
diagram P4.12), using an RSA and tree. 
The first four fields of the index are 
used as control fields; the partition 
number in every index is always zero. 

3. For each logical block of indexes 
written out, create a new, 
second-level index and write it. If 
the second-*level indexes cannot all be 
contained in one string, create a 
third level, and so on, until a level 
is reached at which all indexes can be 
contained in one string. 

If all the sorted first-level indexes cure 

contained in one string, skip points 4 

and 5. 

4. Carry out successive merges, until 
only two levels of index remain. 
Produce a single string from all the 
first-level indexes. 

5. Write the string to SORTWK. 

Discard second and higher-level indexes. 


Module 
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Partition Blocks 


P4.21 



P4.23 
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Extended Description for Diagram P4.22 


Peerage only (not used for Vale) 

1. a Read in the string of indexes 

created in P4.21. 

To reduce data handling, the 
indexes are a mapped*: an 8-byte map 
entry is created for each pair of 
indexes, using a hash table. 

b Sort the map entries into 

partitions, in such a way as to 
maximize the number of logical 
blocks contained in each successive 
partition. 

Partition 0 contains M-1 strings, 
where M is maximum M for phase 3. 
Each of the other partitions 
contains M strings, where M is 
maximum M for phase 2. The last 
partition contains however many 
strings remain. 

2. Using the hash table, transfer the 
assigned partition number from each 
map entry to the corresponding pair of 
indexes. 
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P4.23 


Sort Indexes 


SORTWK 
index area 


1. Read indexes 


2. Create strings of indexes 


3. Create next level of indexes. 
Write first and subsequent levels 
to SORTWK 



If all first 
level indexes 
contained in 
one string: 


Otherwise: 

Produce one string 
from all first-level 
indexes 

5. Write string to 
SORTWK 


SORTWK 
index area 


If >1 partition: If all records in partition 0: 







Extended Description for Diagram P4.23 


Peerage only (not used by Vale). 

The functions are identical to those 
performed in p4.21 # and are carried out 
by the same segments. 

The index sorting carried out here 
differs from that described in p4.21 in 
two respects: 


■e 

VO 


• Indexes entering the routine have been 
updated to contain the correct 
partition number. 

• Entry is from the partitioning 
routine, and exit is to a merge 
routine (intermediate or final') . In 
p4.21, entry is from the sort or 
intermediate merge routine, and exit 
is to the partitioning routine. 
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Extended Description for Diagram P3.3 


An intermediate merge merges strings 
passed from the partitioning routine into 
a smaller number of longer strings on 
SORTWK. 

It makes one pass for each partition 
except partition 0# producing one string 
from each, and then returns control to 
the partitioning routine. The 
partitioning routine continues to call 
the intermediate merge until the strings 
can all be contained in partition 0, when 
it hands control to phase 3 for the final 
merge. 

1. a. Allocate and initialize for SORTWK 

data sets. 

b. Allocate all remaining main storage 
to RSA. Chain bins together. 

2. a. Read in a block of indexes. 

b. Queue the indexes. Each time an 
index is removed from the queue, 
bring in another and merge it into 
the queue. 


Module 




4 


3. Read a logical block of records from 
the address given in the first index 
in the queue. Merge the records into 
the RSA. Remove the index from the 
queue. 

Repeat until the RSA is full. 

4,5 Read a block of records from SORTWK 
to an input buffer. 

If necessary, read a block back from 
the RSA to make room for the incoming 
block (the criterion for writeback is 
described in MO diagram P4.31). 
Otherwise write a block out from the 
RSA., and create indexes for it. 

Merge the incoming block into the RSA. 
Continue until the entire partition 
has been merged and indexed into one 
string on SORTWK. 

Carry out points 3-5 for each 
partition except Partition 0. 
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Extended Description for Diagram P4.31 


u* 

U> 


1 - Read into the input buffer the logical 
block of records pointed to by the 
first index in the index queue. 

2. Find out whether enough records can be 
written out of the RSA to make room 
for the incoming block. 

The space which can be made available 
is equal to the number of empty bins, 
plus the number of records (in the RSA 
and in the incoming block) which 'win* 
over the first record in the next 
block that will be read in (pointed to 
by the next index in the queue). 

If this space is smaller than the 
number of records in the incoming 
block, writeback is needed. 


j Module 

i 

RED 


RED 


3. Merge the incoming block into the RSA, RED 

each record forcing out one to a J RED 

buffer. 

4. Create an index for the new block and RED 

move the block to SORTWK. j 

If writeback is required, add the ! RED 

index to the index queue; otherwise, 
write out the index to SORTWK. 


5. When there is no more input in this 

partition, flush out the records j RE 

remaining in the RSA. me partition j 
is now in one string on SORTWK. ; 




—i 

I 


I 

I 
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P5.31 


Writeback 


U» 


P4.31 (phase 2) 
P4.41 (phase 3) 



P4.31 (phase 2) 
P4.41 (phase 3) 
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Extended Description for Diagram P5.31 


1. Move the first record from the input 
buffer into the first, vacant bin in 
the RSA, and chain into its correct 
position. 

2. Move a record from the losing half of 
the RSA out to a buffer. 

3. When a logical block is complete, move 
it to SORTWK. 

4. Create an index for the new logical 
block. 

5. Merge the new index into the index 
queue (from which blocks of records 
will be selected for reading in to the 
current merge pass). 


Module 


| *** = red in phase 2 , LItyLIV in phase 

I 3. 
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Extended Description for Diagram P5.32 


r 


j Module 
^- 


The difference between this function and 
P5.31 (writeback) is in the handling of 
the indexes: here, they are written out 
to the area passed to the partitioning 
routine; in writeback, they are added to 
the index queue, so that the block to 
which they refer will be read in again in 
the current merge pass. 


1- Move the first record in the input I RED 

buffer into the first vacant bin in I 

the RSA. Chain it into its correct 1 

position. j 

I 

2. Move the winner record from the RSA to I RED 

the output buffer. ! 

3. When a logical block is complete, move I RED 

it to SORTWK. I 

I 

4. Create indexes for the new logical I RED 

block. I 

5. Move the new indexes to the index | RED 

output buffer; when the buffer is j 

full, write it to SORTWK. i 


L. 


't| 

I 

I 

4 


.j 
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Extended Description for Diagram P3.4 


m 

vo 


1 Module 


The differences between the final merge 
and the intermediate merge (P3.3) are 
that: input consists of only one 
partition, partition 0; no new indexes 
are created; and output is to SORTOUT (or 
equivalent) , not to SORTWK. 

1. a. Allocate and initialize for SORTOUT 

and SORTWK data sets. Open the 
SORTOUT data set if it is not VSAM. 

b. Allocate all remaining main storage 
to the RSA. Chain bins together. 

2. a. Read in a block of indexes. 

b. Queue the indexes. Each time an 
index is removed from the queue, 
bring in another and merge it into 
the queue. 

3. Read a logical block of records from 
the address given in the first index 
in the queue. Merge the records into 
the RSA. Remove the index from the 
queue. 

Repeat until the RSA is full. 


LIM/LIV 

LIM/LIV 

LIM/LIV 

LIM/LIV 

LIM/LIV 


L_ 




4,5 Read a block of records from SORTWK 
to an input buffer. 

If necessary, read a block back from 
the RSA to make room for the incoming 
block (the criterion for writeback is 
described in MO diagram P4.31). 
Otherwise write a block out from the 
RSA, taking E35 after each record is 
moved out. 

Merge the incoming block into the RSA. 
Continue until the entire partition 
has been merged into one string on 
SORTOUT. 

6. Write SMF record type 16 to system 
SMF data set, if requested. 
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1. Read a logical block of records 
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Extended Description for Diagram P4.41 


I 1. Read into the input buffer the logical 
block of records pointed to by the 
first index in the index queue. 

2. Find out whether enough records can be 
I written out of the RSA to make roam 
for the incoming block. 

The space which can be made available 
is equal to the number of empty bins, 
plus the number of records (in the RSA 
and in the incoming block) that *win f 
over the first record in the next 
block which will be read in (pointed 
to by the next index in the queue). 

If this space is smaller than the 
number of records in the incoming 
block, writeback is needed. 

I 3. Merge the incoming block into the RSA, 

I each record forcing out one to a 
buffer. Take exit E35. 

| 4. Move the block to SORTWK. 

If writeback is required. Create an 
index for the new block, and add the 
index to the index queue. 

5. When there is no more input, flush out 
| the records remaining in the RSA. 

The data set is now in one string on 
SORTOOT. 


| Module g 

I LIM/LIV ! 

| LIM/LIV | 


I 

j LIM/LIV* 
I LIM/LIV 

I LIM/LIV 


LIM/LIV/XC P 



♦Code generated outside LIM's area; address kept 
in COMMA at CMER6E. 
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P5.41 


Write Out 


P4.41 
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Extended Description for Diagram P5.41 




Module 


1 1. Move the first record in the input 

r 

1 

1 

LIM/LIV/VIM| 

' buffer into the first vacant bin in 

the RSA. Chain it into its correct 
position. 

1 

1 

1 


1 2. Take E35 if specified. 

1 

1 

LIM/LIV/VIM| 

; Move the winner record from the RSA to 

the output buffer. 

1 

1 

« 


13. When the buffer is full , move it to 

1 


* SORTODT. 

1 

LIM/LIV/ | 

VIM/XCP ! 


L~ 

--J 


PS 

u> 
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Extended Description for Diagram P3.5 


| These functions are carried out by module 
j VED; if exit E25 has been specified an 
j additional module, VEE, is used to handle 
j the interface with the E25 routine. 

1. a. Allocate buffers: for input, phase 

2 merge order plus one; for output, 
two. 

b. Initialize the phase work area. 

| c. Load and call E21 and load E25, if 
j specified. 

2. At the beginning of a merge pass: 

a. Fill the input buffers. 

b. Make a simple tree, with one 
pointer to the first record in each 
buffer, and the pointers 
(physically) in the desired output 
order. 

Subsequently: 

c. Keep the pointers updated to point 
to the current record in each 
buffer. 

d. Keep the tree order so that the 
pointers are in the desired output 
order. 

e. Replenish the input buffers when 


necessary, using the extra input 
buffer for * smart lookahead*. 

| 3, a. If E25 is not activated: 

| Move the record pointed to by the 

| first pointer in the tree from its 

| input buffer to the output buffer. 

j b. If E25 is activated: 

| Move the record pointed to by the 

| first pointer in the tree from its 

j input buffer to the E25 work area, 

j Each new record moved to the work 

1 area forces the preceding record 

j out to the output buffer, 

j Take E25. 

4. When the output buffer is full, write 
it to a SORTWK data set and chain it 
into the correct place in the string. 

Repeat 2c-4 until input is exhausted. If 
the number of output strings is now less 
than or equal to maximum phase 3 M, 
continue to point 5. Otherwise, return 
to 2a for another merge pass. 

5. a. Load and call E27 if specified. 

) b. E25 housekeeping. 

c. Free temporarily allocated areas. 
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SORTWKnn 














Extended Description for Diagram P3.6 


1. a. Allocate buffers: for input, phase 

3 M plus one; for output, the 
number determined in phase 0. 

b. Initialize the phase work area. 

c. Load and call E31 if specified. 

2. At the beginning of the phase: 

a. Fill the input buffers. 

b. Make a simple tree, with one 
pointer to the first record in each 
buffer, and the pointers 
(physically) in the desired output 
order. 

Subsequently: 

c. Keep the pointers updated to point 
to the current record in each input 
buffer. 

d. Keep the tree ordered so that the 
pointers are in the desired output 
order. 

e. Replenish the input buffers when 
necessary, using the extra input 
buffer for 'smart lookahead*. 


3. If E35 has been specified: 

a. Move the record pointed to by the 
first pointer in the tree from its 
input buffer to a work area, 
restoring its original format. 

b. Call E3S. 

c. On return, move the record passed 
by E35 to an output buffer. 

Otherwise, move the record pointed to 
by the first pointer in the tree from 
its input buffer to an output buffer, 
restoring its original format. 

4. When the output buffer is full, write 
it to the SORTOUT data set. 


Repeat 2c-4 until input is exhausted. 


5. a. Load and call E37 if specified. 

b. Delete all exit routines. 

c. Free temporarily allocated areas. 
| d. Write SMF record, if requested. 
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CD 



Sort/Merge 
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Extended Description for Diagram N2 


1. Initialize for phase 1. Take Eli, 

El 8 , E19. 

Get records from SORTIN. Take El5, 
E16, El8. 

Create strings, and distribute them 
on SORTWK . The sorting technique 
| used is the replacement selection 

| technique. 

Take E17. 

2. Initialize for phase 2. Take E21, 
E28, E29. 

Read strings of records from SORTWK. 

Take E28. 
o 
vo 


Merge the strings into longer 
strings. Take E61, E25. 

Write out the new strings to SORTWK. 
Take E29, E27. 

3. Initialize for phase 3. Take E31, 
E38 and E39. 

Read strings of records from SORTWK. 
Take E32, E38. 

Merge strings into output buffer. 
Take E61. 

Write out single string to SORTOUT. 
Take E35,E39,E37. 

Perform final housekeeping. 


Licensed Material—Property of IBM 





















Extended Description for Diagram N3.1 


1. The selection of modules is made by 
ICERC6 using information from PPISW1 
combined with the module table 
TBLPH1RN (which is defined in 
ICERC6) . 

Information about user routines not 
link edited by the program is taken 
from the Exit Name Table (. PPIAPGC). 
ICERC9 a) loads all running modules 
and user routines, then b) loads, 
executes and deletes the assignment 
modules one by one. 

2. Take exit 11. Acquire main storage 

(through GETMAIN) for the phase work 
** area, buffers, and RSA. 

Initialize the tree in the phase work 
area. 

Generate the move routine. 

Generate control blocks (DCB, IOB, 
ECB) and CCWs in the phase work area. 
Take exits El8 and El9. 

Define the RSA bin structure, and 
enter the relevant information in the 
PPI. 

Open the SORTIN and SORTWK data sets. 
Records from SORTIN are skipped if 
the SKIPREC option is present. 

Code in the running modules is 
initialized by the respective 
assignment modules. 

If the CRCX or OSCL technique is being 
used some further functions are 
performed here which otherwise belong to 


phase 2; see HO diagram N3.2 for 
details. 

3. Read SORTIN, using QSAM or VSAN. 
locate mode is normally used, but 
move mode is used for spanned 
records. Each deblocked 
variable-length record has its length 
checked. VSAH variable-length records 
are supplied with a record descriptor 
word (ft bytes at the front of the 
record^ . 

Take exit El 5 (record may be altered 
or deleted or a new record inserted). 
If calculated capacity is exceeded, 
take exit El6. 

ft. Fill the RSA, updating the tree for 
each record. 

Create strings by moving records from 
the RSA to a buffer, using the tree 
to select each record to be moved. 

5. Write output, using the EXCP macro 
instruction. 

The sequence in which strings are 
written to the various SORTWK data 
sets is determined by the sequence 
| distribution technique used. 

6. If exact file size was specified, 
check the record counts. 

Take exit E17. 

Close SORTWK data sets. 

Free main storage and delete modules. 
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Module Table for Diagram N3.1 


to 


I Function 


la Select modules 


(Conditions 


OSCL,CRCX phase 1 
(phase 



Always 


1b Load modules _ 

2a Allocate storage |CRCX,OSCL 

_ Otherwise 

2b Build blocks and IPOLY.BALN 
tables 



13a Deblock 


Exit CRCX.OSCL 
Other 


No E 256+ CRCX.OSCL 
I Other 

<256 




Var Exit [CRCX f OSCL 

_ Other _ 

No E CRCX,OSCL 

___ lothe r 

3b VSAM read (additional to deblock 
6 Housekeeping lother than CRCX,OSCL 

(For CRCX 6 OSCL, 
carried out in ph2) 
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N4.11 


Create Strings 
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Extended Description for Diagram N4.11 


Module Table for Diagram n4.11 


-j 

U1 


1. a. Move a record from the input 

buffer to the RSA. 

b. Update the tree. 

2. a. Move the winner from the RSA to 

the output buffer. 

b. Move in the next record from the 
input buffer. 

c. Update the tree. 

Repeat until there are no more 
input records; unless the OSCL or 
CRCX technique is being used, in 
which case repeat until M-1 
strings have been moved to the 
output buffer. 

3. Move remaining records from the RSA 
to the output buffer. 


Function 

Conditions 

Mod 

la Move 

1b Update tree 

2a Block 

Fix 

<256, no E 

_ 4 

Other 

ABS a 

Var_ 

RBF 

Fix 

Mult. 

POLY 

ROE 

Other 

ROA 

Single 

POLY 

ROF 

Other 

ROB 

Var 

Mult. 

POLY 

ROG 

Other 

ROC 

Single 

POLY 

BOH 

Other 

ROD 

Fix 

256+ 

CRCX,OSCL 

RBZ 

Other 

RBC 

<256 

CRCX,OSCL 

RBY 

Other 

RBB 

Var 

CRCX,OSCL 

RBA 

Other 

RBE 

"No special move routine needed—the deblock 
routine used. 

aThis module generates a move routine which is 
kept in main storage (pointed to by PPIBDSVA+4) ; 
if the EQUALS option is in operation, an addi¬ 
tional routine is also generated (tPPIMOVEQ). 
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N4.12 


Distribute Strings 


N4.11 


<T\ 


PPI 


< 



Output buffer 
from phase 1 




CRCX disk 

Writes 1 string to each of N-1 
areas, all in desired order. 

OR 

OSCLtape 

Writes 1 string to each of N-1 
tapes, all in desired order. 


OR 


BALN disk 

Writes to all except largest area, 
in desired order; directory on 
last track of each area. 

OR 

BALN tape 

Writes to n /2 tapes, in reverse 
of desired order. 

OR 

POLY tape 
Writes to N-1 tapes. 

First string on first tape in 
desired order, thereafter 
alternating. 

First string on other tapes in 
reverse order, thereafter 
alternating. 



N3.2 (3) 



N3.1 (6) 



SORTWKOI- 

SORTWKn-1 


SORTWKOI- 

SORTWKn-1 


SORTWKOI- 

SORTWKn-1 


SORTWKOI- 

SORTWK"/2 


SORTWKOI- 

SORTWKn-1 
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Extended Description for Diagram N4.12 


CRCX disk 

One string is written to each of N-1 
areas, if a physical area is too small 
to contain the whole string one or more 
tracks are borrowed from another 
physical area. These together make tip 
the logical area. This can be done 
because each block within the string 
contains the disk address of the 
following block; the last block in a 
string contains its own address. 

Starting addresses of strings 
(t KTABLEL) and free track list 
(♦ KFRTRKLT) are kept in the phase work 
area. 

BALN disk 

Strings are written to N-1 areas in 
order of size, starting with the 
smallest. Eight strings are written to 
each area at a time, completely filling 
one directory block. If a complete 
string does not fit into the remainder 
of an area it is divided into 
substrings, the first completely filling 
the area. 

The directory contains the starting 
address of the string, and the remain¬ 
ing blocks follow consecutively. The 
last block of the string contains a 
special BOS indicator. 

BALN tape 

Strings are written to N/2 tapes, one at 
a time.' If a string does not fit on a 
tape it is divided into substrings. 


OSCL tape 

One string is written to each of N-1 
tapes. 

POLY tape 

Strings are written to N-1 tapes, one at 
a time, until the lowest of the next 
level Fibonacci numbers is reached; then 
to N-2 tapes until the next number at 
the same level has been reached, and so 
on. When a complete level has been 
reached the next level numbers are 
calculated and the process is restarted. 
When all strings have been distributed 
dummy strings are added if necessary to 
make up Fibonacci numbers. The numbers 
of real and dummy strings are kept in 
PPITPTBL. 


Module Table for Diagram N4.12 


Function 

Conditions 

Mod 

la Sequence Distribu- 

CRCX 

80N 

tion algorithm 

OSCL 

RON 


BALN (disk) 

R0K 


BALN (tape) 

ROI 


POLY - 

“ ROJ 

1b Write 

CRCX 

8PA 


BALN (disk) 

RPB 


Other 

RPA 
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N3.2 


N3.1 


Intermediate Merge (Phase 2) 



N3.3 

















Extended Description for Diagram N3.2 


1. The selection of modules is made by 
ICERC7 using information from PPISW1 
and from the module table TBLPH2RN*. 
Exit information is taken from the 
Exit Name Table (tPPIAPGC). 

ICERC9 a) loads all running modules 
and user routines, then b) loads, 
executes and deletes the assignment 
modules sequentially. 

2. Take exit E21*. 

Acquire main storage (through 
GETMAZN) for the phase work area and 
for buffers. 

Generate the record move routine. 
Build the input buffer table and 
network table in the phase work 
area*. 

Generate control blocks (DOB, IOB, 
ECB) and CCWs in the phase work area. 
Take exits E28 and E29*. 

Open the SORTWK data sets. 

Code in the running modules is 
initialized by the respective 
assignment modules. 

Points 3, 4 and 5 are repeated until no 
input strings are left: 

3. Read one string from each input 
tape—unless BALN (disk) is being 
used, in which case read M (or 
remaining, if less) strings at a time 
from one area (the largest of those 
with strings from the previous 
phase) . For reading, the EXCP macro 
instruction is used. 

4. store the address of one record from 
each string (or its extracted control 
fields) in a network table 
(tPPINETAR) . 

Take exit E61. 


Find the next record to be moved to 
the output buffer, using binary 
search. 

Put the address of the next record in 
the 'winner's* string in the. network 
table. 

Take exit E25. 

5. For writing, the EXCP macro 
instruction is used. 

CRCX: The string is written to the 
area not used as input. 

OSCL: The string is written to the 
next tape. 

BALN (disk) : The string is written to 
the output area left empty by the 
previous phase or emptied in this 
pass. 

BALN (tape) : The string is written to 
the next tape. 

POLY: The string is written to the 
| only available tape. 

If the CRCX or OSCL technique is being 
used, the program returns from here to 
Phase 1 (see diagram N3.1) , unless a) 
there is no more input, or b) the 
current level of strings now numbers M, 
in which case it repeats points 3-5. 

6. Take exit E27. 

Check the record counts. 

Close the SORTWK data sets. 

ICERCT free main storage and deletes 
modules. 

Unless the CRCX or OSCL technique is 
being used, the entire phase is 
re-executed until only one more merge 
pass is needed. 

*When the CRCX or OSCL technique is 
used, these steps are executed in 
phase 1; see MO diagram N3.1 
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Module Table for diagram N3.2 


co 

o 


Function 


Conditions 


la Select modules 


1b Load modules 




2b Build control 
blocks and tables 


3 Read 


4a Compare, select, 
update tree 


4b Deblock/block 


ot CRCX or OSCL 


Always 


ot CRCX or OSCL 


BALN (disk) AGJ 

POLY.BALN(tape) AGG 


POLY,BALN(t) forward RGL 
_ backward RGB 


OSCL RGB 


BALN 


CRCX 


Multiple 

Single 


Exit 

Other _ 

No E 256* I CRCX,OSCL 

_I Other 

<556 


I EB3EE5 

ESI 

IB 

IBEI 


Var ExitI CRCX,OSCL 
Other 

NO E CRCX,OSCL 
Other 


N i 0 ^ Jlfl 


4c Move (additional to debloc 
256-*’ and/or with exits) 



or 


ABR 


5a Sequence distribu 
tion algorithm 


5b Write 


Housekeeping 


CX 


OSCL 


BALN(disk 


BALN 


POLY 


CRCX 


OSCL 





OSCL 


Other 


"The move routine is generated by this module and 
kept in main storage (tPPIBDSVA+8). 
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Extended Description for Diagram N3.3 


1. The selection of modules is made by 
ICERC8 using information from PPISW1 
combined with the module table 
TBLPH3RN. 

Exit information is taken from the 
Exit Name Table (.PPIAPGC). 

ICERC9 first loads the running 
modules and user routines, then 
loads, executes and deletes the 
assignment modules sequentially. 

2. Take exit E31. 

Acquire main storage (through 
GETMAIN) for the phase work area and 
os buffers. 

U/ Generate the move routine in the 

phase work area. 

Build control blocks (DOB, IOB, ECB) 
and CCWs in the phase work area. 

Take exits E38 and E39. 

Open SORTOUT and the input data sets. 
Code in the running modules is 
initialized by the respective 
assignment modules. 

3. For a sort, the strings are read from 
the SORTWK data sets. 

For a merge, the input strings are 
the SORTINnn data sets, or are 
supplied through E32. 


4. Take exit E61. 

The address of one record from each 
input string (or of its extracted 
control fields) is kept in a network 
table (fPPINETAR) . The next record to 
be moved to the output buffer is 
determined using binary search. 

The address of the next record in the 
'winner's* string is put in the 
network table. 

5. Take exit E35. The record may be 
altered or deleted or a new record 
inserted. The current record is then 
written to SORTOUT. The program uses 
QSAM or VSAM for writing output. 
Normally locate mode is used, but 
move mode is used for spanned 
records. 

6. Take exit E37. 

Check record counts. 

Close data sets, free main storage, 
and delete modules. 
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Module Table for Diagram N3.3 


Function 

Conditions 

Mod 

la Select modules 

Always 

RC8 

1b Load modules 

Always 

RC9 

2a Allocate storacre 

Always 

API 

2b Build control 

Tape sort 



APR 

blocks and tables 

Disk sort 



AGK 


Merqe 




APF 

3a Read 

POLY,BALN (tape) 1 

forward 

RGM 





_ 

backward 

RGD 
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Licensed Material—Property of IBM 




























Section 3: Program Organization 

Page of LY33-8042-6, As Updated 31 March 1981, By TNL LN20-9345 


This section describes the structure of the sort/merge program, and of 
each of the phases that make up the program. For a sorting application 
all phases are normally used, as shown in Figure 1 in Section 1. For 
merging applications, only the first and last phases are used. 

The interface between the various load modules is shown. 

The phases are described, and a cross reference given to the appropriate 
MO diagrams in the Method of Operation section (Section 2) . Record 
movement is also described. 

Phase structures and storage layouts are shown in figures at the end of 
this section. 


Program Exit Handling 


Provisions are contained in Phases 1, 2 and 3 for inclusion of user 
routines at program exits. The linkage editor includes the user 
routines in the load module for the appropriate phase; however, when 
proper specifications are provided on the MODS control statements, 
link-editing does not occur, and the routines are loaded by the phase 
loader modules. See Appendix A for the various exits. 


Module Interface 


The interface of load modules in the program is shown in Figure 7. 

While ICERCB is in main storage a patch area of 48 bytes (hex 30) is 
available. It is located at offset 1132 (hex 46C) from the start of the 
PPI area. Register 13 points to the PPI. The area is initialized with 
binary zeros. 

When Phase 1 of Blockset (ICEIPUT for FLR, ICEIPVT for VLR) detects 
an error condition, it hands control to either ICEMESI or ICEMSGV, 
respectively. Phase 3 hands control to ICEMESO. When error conditions 
are detected in Phase 1, 2, or 3 of the other techniques, control 
is handed to the phase interface module (ICEMON for Peerage and 
Vale techniques, and ICERCV for the other techniques). The phase 
interface module handles the issuing of the appropriate message. 
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Operating system or calling program 



SVC109 
MVS only 


| Figure 7. (1 of 4). Load Module Interface, FLR-Blockset 
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Figure 7. (2 of 4). Load Module Interface, VLR-Blockset 
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Operating system or calling program 
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| Figure 7. (3 of 4). Load Module Interface, Peerage anc 
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This phase collects the current system and sort control card 
information. It then decides which technique to be used and does the 
internal sort optimization. The'functions are described in MO diagram' 
] D2. For conventional techniques, an SMF record type 16 is written 
| to the system SMF data set, if requested. 


Phase 1 


Phase 1 performs the initial ordering of the input records. This is a 
one-pass phase (that is, each record is processed only once) that 
arranges the records of the input data set into ordered sequences. The 
sequences are written on the intermediate storage devices according to a 
predetermined distribution procedure. 

with Blockset and Peerage, but not with Vale, an index entry is created 
for each work file block. This entry contains the control word of the 
first record in the block, and the block's disk address. 

For Blockset applications this phase is described in MO diagram B3.1; 
for Peerage and Vale in MO diagram P3.1; for other techniques in MO 
diagram N3.1. 

The input of records is controlled by EXCP, or by the SAM access method, 
and output is controlled by the sort/merge program—unless the 
application is a standard disk sort which needs no work storage, in 
which case EXCP or SAM is used to produce the output data set. The 
sorting method used to order the records into sequences is a version of 
the replacement-selection technique. 

When the conventional OSCL tape or CRCX disk techniques are used, 
control alternates between Phase 1 and Phase 2. with the BALN tape or 
disk technique. Phase 1 is first completed and then control is handed to 
either Phase 2 or Phase 3. 


Phase 2 

BLOCKSET TECHNIQUE 


This phase processes the index entries from Phase 1 and assigns each 
block to a cylinder block set for merging. Two construction algorithms 
are used: one for a merge which writes only to the output file, and one 
for a merge which also writes to the work file. 

This phase is described in MO diagram B3.2. 
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OTHER TECHNIQUES 


For all other techniques, this phase combines the sequences produced by 
Phase 1 into a lesser number of longer sequences. It makes as many 
passes as necessary until the number of record sequences resulting from 
a given pass is equal to or less than the maximum Phase 3 merge order. 

The merge order (M) is the number of sequences merged in any one merge 
pass. Maximum M for a given application is limited by the number of 
intermediate storage areas available, by the technique being used, and 
frequently by the number of buffers which can be accommodated in 
available main storage. 

Phase 2 continues, therefore, until the total number of sequences 
remaining on all work areas is less than or equal to maximum M for the 
application in question. 


Peerage Technique 


This phase is described in MO diagrams P3.2 and P3.3. 

The phase is in two parts, carried out by modules ICEPAR and ICERED. 
ICEPAR receives control after Phase 1 (ICECRE) . It partitions the 
files, i.e. rearranges their indexes so that they will be read in by the 
merge in the most efficient order. If necessary, ICEPAR then initiates 
an intermediate merge: it instructs ICEMON to hand control to ICERED, 
which after merging returns to ICEPAR via ICEMON. This process 
continues until ICEPAR detects that the program is ready to enter 
P hase 3. 


Vale Technique 


This phase is described in MO diagram P3.5. 

Each pass can merge up to 64 sequences. Two output buffers are used. 

The number of input buffers is M (merge order) + 1; the extra one is for 
'smart lookahead', which means that when a buffer from a given sequence 
is emptied its next block should already be in main storage. 


Conventional Techniques 


This phase is described in MO diagram N3.2. 

Each pass is capable of merging up to 16 previously sorted record 
sequences, or 63 if the balanced disk technique is used. 

When the OSCL or CRCX techniques are used, control alternates between 
Phase 1 and Phase 2. 
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Phase 3 is a one-pass phase and produces a single ordered record 
sequence, thus completing the application. 

For Peerage this phase is described in MO diagram P3.4; for Vale in 
P3.6; for Blockset in MO diagram B3.3; and for other techniques in N3.3. 

In a sorting application, it follows Phase 2 {or Phase 1 if a Vale, 
Blockset, or conventional sort, skips Phase 2) . In a merging 
application, it is executed immediately after Phase 0. 

For a merging application, record input and output operations are 
performed by the control program's data management routines. For the 
final merge of a sorting application. Sort handles the record input 
operation, and EXCP or SAM is used to handle the record output 
operation, as in a merging case. 

At the end of this phase for Blockset, Peerage, and Vale, an SMF 
record type 16 is generated and written to the system's SMF data 
set, if requested as an installation option. 


Phase Structures 


The Blockset, Peerage, and Vale technique phases consist normally of one 
load module each. 

With other techniques the load modules are either planned overlay 
structures or dynamic structures. The organization of each phase with 
planned overlay or dynamic structures, and the modules that comprise 
them, are presented on the following pages. The modules for each phase 
are not necessarily placed in contiguous storage locations. In the case 
of dynamic phase structures, the modules are presented in the order in 
which they receive control. 
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REENTERABLE 
SYS1.LPALIB, 

LOAD MODULES, Peerage in 

SYS1.LINKLIB, or a private link library 

ICEAM1 

ICEERR 


ICECKP 

ICELIM 


ICECRE 

ICELIV 


ICECRO 

ICEMAN* 

alias sort 

ICEDEC 

ICEMON 


ICEDED 

ICEM05 


ICEDEF 

ICEOBS 


ICEDEG 

ICEPAR 


ICEDEV 

ICERED 


ICEDYN 

ICEXCP 



NONREENTERABLE LINK MODULES, Peerage in 
SYS1.LINKLIB or a private link library. 


ICEBUG (used for producing a special formatted dump). 
ICECOM (source code for ICECOMMA. 


SVC MODULES, REENTERABLE, Peerage in 
SYS1.LPALIB or SYS1.SVCLIB. 


IGXQQ017J ICEFIX for SVS/VS1 
ICEFIXM for MVS 
SVCXXX: ICEFIXO for MFT/MVT 


The SVC names can be changed by the user for SVS/VS1, 
and must be renamed by the user for MFT/MVT. 


*See Blockset modules for further information. 


Figure 8. Peerage Modules 
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REENTERABLE LOAD MODULES, Vale in 

SYS1.LPALIB, SYS1.LINKLIB, or a private link library 


ICEAM1 

ICEMON 

ICEVRO 

ICECKP 

ICEMOS 

ICEXCP 

ICEDEC 

ICEOBS 


ICEDED 

ICEVED 


ICEDEF 

ICEVEE 


ICEDEG 

ICEVIM 


ICEDEV 

ICEVIP 


ICEDYN 

ICEVRE 


ICEERR 

ICEVRN 



ICEMAN* alias sort 


NONREENTERABLE LINK MODULES, Vale in 
SYS1.LINKLIB or a private link library. 


ICEBUG (used for producing a special formatted dump). 
ICECOM (source code for ICECOMMA. 


SVC MODULES, REENTERABLE, Vale in 
SYS1.LPALIB or SYS1.SVCLIB. 


IGX00017: ICEFIX for SVS/VS1 
ICEFIXM for MVS 
SVCXXX : ICEFIXO for MFT/MVT 


The SVC names can be changed by the user for SVS/VS1, 
and must be renamed by the user for MFT/MVT. 


*See Blockset modules for further information. 


Figure 9. Vale Modules 
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OJECT AND LOAD MODULES, FLF 

-—----- 1 

J-Blockset in 

SYS1.LPALIB, SYS1.LINKLIB, 

or a private link library 

Load 

Object 

Modules 

Modules 
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ICEMAN 


ICEINIB 
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ICEINID 


ICEINIO 


ICEDYNA 
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ICEEXIN 
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ICEDEVT 
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ICEIPUT 
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SYS1.LPALIB or SYS1.SVCLIB 


IGX00017! ICEFIX for SVS/VS1 
ICEFIXM for MVS 

5VCXXX ! ICEFIXO for MFT/MVT _ 

The SVC names can be changed by the user for SVS/VS1, 
and must be renamed by the user for MFT/MVT 

| Figure 10. (1 of 2). FLR-Blockset Modules 
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OJECT AND LOAD MODULES, FLR-Blockset in 

SYS1.LPALIB, SYS1.LIMKLIB, or a private link library 

Load Object 
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SVC MODULES, REENTERABLE, FLR-Blockset in 
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10X00017: ICEFIX for SVS/VS1 
ICEFIXM for MVS 
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The SVC names can be changed by the user for SVS/VS1, 
and must be renamed by the user for MFT/MVT 

Figure 10. (2 of 2). FLR-Blockset Modules 
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OJECT AND LOAD MODULES, VLR-Blockset in 
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r-n 

| NONREENTERABLE MODULES, Conventional Techniques in ! 

j SYS1.LINKLIB or a private link library j 

I-i 

| ICERCB ICERCM (overlay module, see Figure 12} | 

j ICERCO ICERC2 (overlay module, see Figure 12) j 

j-( 
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j SYS1.SORTLIB or a private sort library | 
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Figure 11. Conventional Technique Modules 
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Figure 12. Object Modules in the Two Overlay Load Modules 
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Figure 13. (1 of 6) Load Modules With Conventional Techniques 

Phase 0, Initialization, Stage 2 (Definition) 
Overlay Structure 
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RCB 



Figure 13. (3 of 6) Load Modules with Conventional Techniques 

Phase 1, BALN and POLY Techniques. 

Overlay Structure. 
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RCB 



Figure 13. (4 of 6) Load Modules with Conventional Techniques 

Phases 1 and 2, OSCL and CRCX Techniques. 
Dynamic. 
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RCB 



Figure 13. {5 of 6) Load Modules with Conventional Techniques 

Phase 2, BALN and POLY Techniques. 
Dynamic. 
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ROPor ROQ 


RBL, RBM, RBN, RBO, RBP, 8BN, or 8BO 
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Figure 13. (6 of 6) Load Modules with Conventional Techniques 

Phase 3. 

Dynamic. 
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Storage Layouts 


| BLOCKSET, PEERAGE, AND VALE TECHNIQUES 


| Storage is allocated as follows: 

| 1. Phase 0 issues a GETMAIN primarily for the communications area, 
j COMMON or COMMA, and the extract/restore code area, which is 

j variable in length. 

| 2. If SORTWK data sets have been defined, a GETMAIN is issued for the 

j necessary I/O area. Storage is also allocated to the Checkpoint/ 

I Restart track pool if necessary (though not for Blockset). 

| 3. End of Phase 0 frees whatever part of the first area is not needed 

j by COMMON or COMMA and the extract/restore code area. 

4. Phases 1 and 3 begin by getting space for buffers for SORTIN and 
SORTOUT. 

5. Each of the Phases 1-3 gets the remaining required storage by 
issuing a series of variable GETMAINS until it reaches SIZE or 
MAXLIM. At the end of the phase it frees this storage again. 


OTHER TECHNIQUES 


The storage allocation technique used is such that main storage is first 
allocated for necessary or required areas (proceeding from the largest 
to the smallest) , and then for the optional areas (in priority order) . 
This is accomplished by issuing variable-type requests for main storage. 
The minimum request is equal to the size of the largest necessary area; 
and the maximum, equal to the total size of all areas. 

If additional main storage is needed, the unused portion of the previous 
allocation is made available for subsequent allocations. The minimum 
request becomes equal to the size of the area next-in-line to be 
allocated; and the maximum, equal to the total size of all unallocated 
areas. (This process is continued until either all areas are allocated, 
or the minimum request cannot be satisfied.) 


104 




Licensed Material—Property of IBM 


PPILAB08 
l—»RSA Table 


PPILAB04 


PPILAB02 

I—»Input buffer table 


PPIGETMN 
I—►Table of addr. 
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I—►Table of sizes 
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Input buffer table 

PPILAB08 
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*(Only for disk sort) 


Phase interface (ICERCB) 
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Running modules 
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Each section pointed to by an entry in 
the RSA Table. 


Buffer count field (8 bytes)* + 

Output buffer 1 (Length in PPILAB07) 


Buffer control block (8 bytes) + 
Input buffer 1 (length in PPILAB03) 


Phase work area 

Includes RSA Table, Input Buffer Table 
PPILAB08-* PPILAB02^ 


Work area for spanned input (if needed) 


Buffer count field (8 bytesf+ 

Output buffer 2 (length in PPILAB07) 


Input buffer 2 (length in PPILAB03) 


Additional RSA space 


Required 
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Dynamic 

storage 

allocations 


Areas used 
if space 
available 



Figure 14. (1 of 4) Storage Layouts for Conventional Techniques 

Phase 1, BALN and POLY Techniques 
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1—* Input buffer table' 


PPILAB05-► 

PPILAB02 

(—►Input buffer table-► 
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(—►Input buffer table-► 


PPILAB08 
(—►RSA table 



PPILAB08 
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Phase interface (ICERCB) 


££] (ICERCA) 
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M input buffers to phase 2 

M=no. of intermediate storage areas 
(Length of each in PPILAB03) 

OR 

RSA in phase 1 

Count field (8 bytes) for CRCX, •+ 

Output buffer 1 (length in PPILAB07) 

Phase work area 

Includes RSA table and input buffer table 
PPISGN1 points to beg. of last area 
allocated 

Buffer control block (8 bytes) + 

Input buffer 1 to phase 1 (length in 
PPILAB03) 

Work area for spanned input records 
(if needed) 

Count field (8 bytes) for CRCX.+ 

Output buffer 2 (length in PPILAB07) 

Input buffer 2 to phase 1 (length in 
PPILAB03) 
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to phase 2 
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(Length of each in PPI LAB03) 

OR 

Additional RSA space in phase 1 


Additional RSA space in phase 1 


Required 

areas 


Dynamic 

storage 

allocations 


Areas used 
if space 
available 


Figure 14. (2 of 4) Storage Layouts for Conventional Techniques 

Phases 1 and 2, CRCX and OSCL Techniques 
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PPILAB02 

‘—♦Input buffer table 


PPILAB04-► 


PPIGETMN 
1—►Table of addr. 
PPIGETSZ 
*—►Table of sizes 


PPILAB05-► 


PPILAB02 

•—►Input buffer table 


Phase interface (ICERCB) 


PPI (ICERCA) 

Running modules 

M Input buffers 

M°no. of intermediate storage areas 
(Length of each in PPILAB03) 


Count field (8 bytes) for disk sort, + 
Output buffer 1 (length in PPILAB07) 

Phase work area 

PPISPGN1 points to beginning of last area 
allocated within work area. 

Count field (8 bytes) for disk sort, + 
Output buffer 2 (length in PPILAB07) 


1 to M additional input buffers 

M=no. of intermediate storage areas 
(Length of each in PPILAB03) 


Required 

areas 


Areas used 
if space 
available 


Dynamic 

storage 

allocation 




Figure 14. 


(3 of 4) 


Storage Layouts for Conventional Techniques 
Phase 2, POLY and BALN Techniques 


Section 3. Program Organization 
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PPILAB02 

'—♦Input buffer table 


PPILAB04 


PPIGETMN 
'—♦Table of addr. 
PPIGETSZ 
'-♦Table of sizes 


PPILAB06- 

PPILAB02 

'—♦Input buffer table 


Phase interface (ICERCB) 


PPJ (ICERCA) 


Running modules 


M input buffers 

M=no. of intermediate storage areas 
(for a sort), or no. of input 
files (for a merge) 

Each area preceded by 8-byte buffer 
control block. Length in PPILAB03. 


Control block (8 bytes) + 

Output buffer 1 (length in PPILAB07) 


Phase work area 
Includes input buffer table 


M work areas for spanned input 
M=no. of input files (if needed) 


Work area for spanned output (if needed) 


Output buffer 2 (length in PPILAB07) 


1 to M additional input buffers 
Length of each in PPILAB03 


Required 

areas 


Dynamic 

storage 

allocations 


Areas used 
if space 
available 


Figure 14. 


(4 of 4) Storage Layouts for Conventional Techniques 
Phase 3, All Techniques 
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Section 4. Directories 


This section lists all module names: first Blockset, then Peerage and 
Vale, then conventional technique modules. Each list is in alphabetical 
order. Cross references are given to other parts of the publication. 


Blockset Directory 


This directory lists Blockset object modules. Their names are in the 
form ICEmod, where mod is the three or four character identification of 
the module. Only these last characters are listed. The list also gives 
a reference to the Method of Operation diagrams (MO diag) provided in 
Section 2. 


Module 

Name 

Used in 
Phase: 

FLR or 
VLR 

MO 

Diag 

Purpose 

AMI 

0 

FLR/VLR 


Supply installed defaults 

CKUT 

3 

FLR 

B3.3 

Sortout check 

COBU 

3 

FLR 

B3.3 

Exit E35 interface for invoked sort 

COBV 

1 

VLR 

B3.1 

Exit E15 with no SORTIN interface 

CYLN 

1,2,3 

FLR/VLR 


Cylinder selection 

DEVT 

All 

FLR/VLR 


Device table 

DYNA 

0 

FLR/VLR 

D3.1 

Dynamic allocation of SORTMK (MVS only) 

EXII 

1 

FLR 

B3.1 

Phase 1 exit 

EXIK 

2 

FLR 

B3.2 

Phase 2 exit 

EXIN 

0 

FLR/VLR 

D3.1 

Phase 0 exit 

EXIO 

3 

FLR 

B3.3 

SMF write and final exit from sort 

EXIT 

3 

FLR 

B3.3 

Final exit point 

E15B 

1 

FLR 

B3.1 

Exit E15 interface 

E35B 

3 

FLR 

B3.3 

Exit E35 interface 

FAUL 

0 

FLR 

D3.1 

Initialization values 

FILI 

1 

FLR 

B3.1 

Load module filler 

FILK 

2 

FLR 

B3.2 

Load module filler 

FltO 

3 

FLR 

B3.3 

Load module filler 

FORM 

0 

FLR 

D3.1 

Control field format tables 

FVLI 

1 

VLR 

B3.1 

Input phase load module filler 

FVLK 

2 

VLR 

B3.2 

Key Phase load module filler 

FVLN 

0 

FLR/VLR 

D3.1 

Phase 0 load module filler 

FVLO 

3 

VLR 

B3.3 

Output phase load module filler 

GENV 

1 

VLR 

B3.1 

Point input code generation 

BE I 

0 

FLR/VLR 

D3.1 

Control statement handling 

BE ■ ! 

0 

FLR/VLR 

D3.1 

Generate extract/restore code 

■31 l 

0 

FLR/VLR 

D3.1 

Initialize move and tree code 

INIO 

0 

FLR/VLR 

D3.1 

Transfer conditions for other techn. 

IPUB 

1 

FLR 

B3.1 

Phase 1 I/O handling 

IPUM 

1 

FLR 

B3.1 

Handle records and indexes 

IPUT 

1 

FLR 

B3.1 

Initialize for Phase 1 

IPVB 

1 

VLR 

B3.1 

Input phase I/O handler 

IPVM 

1 

VLR 

B3.1 

Handles input records and indexes 

IPVT 

1 

VLR 

B3.1 

Initialize for input phase 

FLR = fixed-length record 

VLR ~ variable-length record 
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Module 

Used in 

FLR or 

MO 


Name 

Phase: 

VLR 

Diag 

Purpose 

KPUA 

2 

FLR 

B3.2 

Virtual block construction 

KPUB 

2 

FLR 

B3.2 

Phase 2 I/O handling 

KPUS 

2 

FLR 

B3.2 

Virtual block construction 

KPUT 

2 

FLR 

B3.2 

Initialize for Phase 2 or 3 

KPUV 

2 

FLR 

B3.2 

Virtual block construction 

KPVA 

2 

VLR 

B3.2 

Virtual block construction 

KPVB 

2 

VLR 

B3.2 

Key phase I/O handler 

KPVS 

2 

VLR 

B3.2 

Key phase writeback merge 

KPVT 

2 

VLR 

B3.2 

Initialize for key and output phases 

KPVV 

2 

VLR 

B3.2 

Victual block construction 

LIMI 

3 

FLR 

B3.2 

Writeback limit 

MAN 

0 

FLR/VLR 

D3.1 

Handle parameter list and DD statements 

MES,I 

1 

FLR 


Handle Phase 1 messages 

MESS 

All 

FLR/VLR 


Message handling 

MESV 

1 

VLR 


Handle input phase messages 

MSGI 

1 

FLR/VLR 


Phase 1 messages 

MSGK 

2 

FLR/VLR 


Phase 2 messages 

MSGN 

0 

FLR/VLR 


Phase 0 messages 

MSGO 

3 

FLR/VLR 


Phase 3 messages 

OPUA 

3 

FLR 


Phase 3 subroutines 

OPUB 

3 

FLR 

B3.3 

Phase 3 I/O handling 

OPUT 

3 

FLR 

B3.3 

Handle records and indexes 

OPVA 

3 

VLR 

B3.3 

Output phase subroutines 

OPVB 

3 

VLR 

B3.3 

Output phase I/O handler 

OPVT 

3 

VLR 

B3.3 

Main output driver 

OXIV 

3 

VLR 

B3.3 

Output exit and message entry points 

oxov 

3 

VLR 

B3.3 

SMF write and final exit from sort 

SUBS 

1.3 

FLR 


Suballocate main storage 

SUBX 

1.3 

VLR 


Suballocate main storage 

XPUT 

1,2,3 

FLR 


Load user exits 

15V 

1 

VLR 

B3.1 

Exit E15 with SORTIN interface 

35VL 

3 

VLR 

B3.3 

Exit E35 interface 

1 FIR = fixed-length record 



| VLR = variable-length record 
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Peerage and Vale Directory 

This directory lists Peerage and Vale load modules. Their names are in 
the form iCEmod, where mod is the three or four character identification 
of the module. Only these last characters are listed. The list also 
gives a reference to the Method of Operation diagrams (MO diag) provided 
in Section 2. 


j Module 

| Used in 

| MO 

j Name 

1 

j Phase: 

j Diag 

| 

r~ — 

| AMI 

1 o 

| BUG 

1 All 

i 


| CKP 

1 

1 2 
j 


| COM 

| All 

1 

| 

| CRE 

1 

| 1 

1 

| P3.1 

| CRO 

1 1 


| DEC 

1 o 

| D3.2 

| DED 

i 0 

| D3.2 

j DEF 

1 0 

| D3.2 


1 

1 

| D3.2,) 

I DEG 

| 0 

1 

I D3.3, 

1 P3.1 J 

| DEV 

1 0 

1 

| D3.3 

j ERR 

S 0,1,3 

s 

i 

1 FIX 

1 0,1 

1 

| (SVS/VS1) 

1 

| FIXO (OS) 

1 0,1 


j LIM 

i 3 

j P3.4 

| LIV 

i 3 

1 

| P5.31/ 

I \ 

] MAN 

1 

1 0 

( D3.1 

| MON 

| All 


| OBS 

1 0 

I 

| 

| PAR 

1 

1 2 

| P3.2 

j RED 

1 2 

1 

| P3.3 

| VED 

1 2 

1 

| P3.5 

| VEE 

1 

S 2 

| P3.5 

| VIM 

I 3 

i 

1 P3.6 r 

| VIP 

1 

I 3 
* 

1 l 

| VRE 

1 

| 1 
■ 

I P3.1 j 

| VRN 

1 

I 1 

i 

! ( 

| VRO 

1 

| 1 
i 

I 1 

1 XCP 

1 

1 o 

1 


| Purpose 

f- 

| Supply installed defaults 
j Handle formatted dumps 

j Prepare for checkpoint and/or 
j release unused work space 
| Source code for ICECOMMA 
j (formatted dump) 

| Manage Phase 1 
j Final output in Phase 1 

j Manage Phase 0 (part 1) 


Manage Phase 0 (part 2) 

Manage Phase 0 (part 3) 

Handle VSAM I/O errors 
Page fixing and freeing (SVC) 

DEB modification for I/O chaining (SVC) 
Manage Phase 3 

Handle VSAM output in Phase 3 
(Peerage only) 

Handle transfer from Blockset 
Overall program management 
Open for SORTIN/SORTOUT EXCP 

Manage Phase 2 (partitioning) 

Manage Phase 2 (merging) 

Manage Phase 2 (merging, with variable 
length or very long records) 

Take E25 if specified 

Manage Phase 3 (variable length or very 
long records) 

Initialize Phase 3 

Manage Phase 1 (variable length and 
very long records) 

Manage Phase 1 (variable length or very 
long records) 

Final output in Phase 1 

Build channel programs for SORTIN and 
SORTOUT 
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Directory for Conventional Techniques 

The names are listed alphabetically. All CSECTS are included, plus any 
other labels referenced in other sections of this publication. 


| EXPLANATION OF COLUMN HEADINGS 


CSECT Name 

Naming conventions are described in Appendix D. 

Each CSECT name consists of six characters, the first three of which are 
always ICE. For easy reference, the names are listed by their last 
three characters only. In Phases 1, 2 and 3 those which begin with 'A* 
or *9' are generally assignment modules, and those which begin with 'R' 
or *8' are running modules. With a few exceptions, module Axy will 
carry out assignment for module Rxy, and so on. 


Used in Phase; 


The phases are: 

0 (Def) - Definition 

0 (Opt) - Optimization 

1 - Sort (only for sorting applications) 

2 - Intermediate merge (only for sorting applications) 

3 - Final merge 

The first and last phases have some alternative modules for sorting 
applications and for merge-only applications, which are indicated as 
follows: 

3 Sort - Used in Phase 3 of a sorting application 

3 Merge - Used in the merge phase of a merge-only application 
3 All - Can be used in this phase for all applications 

The words 'sort*, 'merge' and 'all* are used with 0 (Def) and 0 (Opt) in 
the same way. 


MO Diagram 


Provides a cross reference to the relevant diagram in the Method of 
Operation section (Section 2) . 


Purpose 


The major purpose of the CSECT is briefly described. Keep in mind the 
notes on modules beginning with a A a and a 9 a (above, under 'CSECT Name') . 

Mult - Means a multiple compare routine is used to 
compare control fields; 

No Mult - Means it is not; 

Extract - Means an extract routine is used 
to compare control fields. 
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CSECT 

Name 

Used in 
Phase: 

MO 

Diag 

Purpose 

ABA 

1 


CRCX £ OSCL: block var. records 

ABB 

1 


Block fixed-length records with in-line move 

ABC 

1 


Block fixed-length records with link to 
multiple move 

ABE 

1 


Block var. records with move 

ABF 

1 


Move var. records 

ABG 

2 


Block or deblock fixed-length records with 
in-line move (no exits) 

ABH 

2 


Block or deblock fixed-length records with 
link to multiple move (no exits) 

ABI 

2 


Block or deblock var. records (no exits) 

ABJ 

2 


Block or deblock fixed-length records 
(exits used) 

ABK 

2 


Block or deblock var. records (exits used) 

ABL 

3 all 


Block fixed-length records with in-line 
move (no exits) 

ABM 

3 all 


Block fixed-length records (exits used) 

ABN 

3 all 


Block var. records (no exits) 

ABO 

3 all 


Block var. records (exits used) 

ABP 

3 all 


Block fixed-length records with link to 
multiple move 

ABQ 

3 all 


Move generator for fixed-length records 

ABR 

2 

N3..2 

Move generator for fixed-length records 

ABS 

1 

N4.11 

Move generator for fixed-length records 

ABT 

2 


CRCX £ OSCL: block/deblock fixed-length 
records up to 256 bytes (no exits) 

ABU 

2 


CRCX 6 OSCL: block/deblock fixed-length 
records >256 bytes (no exits) 

ABV 

2 


CRCX 6 OSCL: block/deblock var. records 
(no exits) 

ABW 

2 


CRCX 6 OSCL: block/deblock fixed-length 
records (exits used) 

ABX 

2 


CRCX 6 OSCL: block/deblock var. records 
(exits used) 

ABY 

1 


CRCX £ OSCL: block fixed-length records up 
to 256 bytes 

ABZ 

1 


CRCX £ OSCL: block fixed-length records 
>256 bytes 

ADB 

1 


Deblock fixed-length records with in-line 
move (no exits) 

ADC 

1 


Deblock fixed-length records with link to 
multiple move (no exits) 

ADD 

1 


Deblock fixed-length records (exits used) 

ADE 

1 


Deblock var. records (exits used) 

ADG 

1 


Deblock var. records (no exits) 

ADH 

3 sort 


Deblock fixed-length records 

ADI 

3 sort 


Deblock var. records 

ADJ 

3 merge 


Deblock (no exits) 

ADL 

2 


Build tables in input buffer addresses 

ADP 

1 


CRCX £ OSCL: deblock fixed-length records 
up to 256 bytes (no exits) 
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CSECT 

Used in 


MO 

Purpose 

Name 

Phase: 


Diag 


ADQ 

1 




CRCX £ OSCL: deblock fixed-length records 
>256 bytes (no exits) 

ADR 

1 




CRCX £ OSCL: deblock fixed-length records 
(exits used) 

ADS 

1 




CRCX S OSCL: deblock var. records (exits 
used) 

ADT 

1 




CRCX £ OSCL: deblock var. records (no exits) 

ADU 

3 

merge 



Deblock (exits used) 

ADX 

3 

sort 



Deblock for read-forward tape, fixed-length 
records 

AGA 

1 



N3.1 

For tape, generate DCBs, IOBs, DCB addresses 

AGB 

2 




Read tape backward 

AGC 

2 




Read disk 

AGD 

3 

sort 



Read tape backward 

AGE 

3 

sort 



Read disk 

AGF 

3 

merge 



Open files 

AGG 

2 



N3.2 

For tape, generate DCBs, IOBs, DCB addresses 

AGH 

3 

sort 



Open files (and call checkpoint module) 

AGI 

1 



N3.1 

For disk, generate DCBs, IOBs, DCB addresses 

AGJ 

2 



N3.2 

For disk, generate DCBs, IOBs, DCB addresses 

AGK 

3 

sort 


N3.3 

For disk, generate DCBs, IOBs, DCB addresses 

AGL 

2 




For tape, read forward 

AGM 

3 

sort 



For tape, read forward 

AGN 

1 



N3.1 

OSCL: generate DCBs and IOBs 

AMA 

1 




Contain messages for phase 1 assignment 
modules 

AMB 

2 




Contain messages for phase 2 assignment 
modules 

AMC 

3 

all 



Contain messages for phase 3 assignment 
modules 

AMI 

0 




Supply installed defaults 

AOA 

1 




Sort fixed-length records, 'multiple* 

(not POLY) 

AOB 

1 




Sort fixed-length records, 'single* 

(not POLY) 

AOC 

1 




Sort var. records, 'multiple* (not POLS) 

AOD 

1 




Sort var. records, 'single* (not POLS) 

AOE 

1 




POLY: sort fixed-length records, 'multiple* 

AOF 

1 




POLY: sort fixed-length records, 'single* 

AOG 

1 




POLY: sort var. records, 'multiple* 

AOH 

1 




POLY: sort var. records, 'single* 

AO I 

1 




BALN (tape) sort algorithm 

AOJ 

1 




POLY sort algorithm 

AOK 

1 




BALN (disk) sort algorithm 

AOL 

0 

(Opt) 

all 

D3.4 

Generate equals routine 

AOM 

0 

(Opt) 

all 

D3.4 

Generate extract routine (part 1) 

AON 

1 



OSCL sort algorithm 

AOP 

2 

£ 3 all 


Merge, 'multiple* 

AOQ 

2 

£ 3 all 


Merge, 'single' 


AOR 

AOS 

AOT 
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CSECT 

Used in 


MO 

Purpose 

Name 

Phase: 


Diag 


AOW 

1 




CRCX £ OSCL: initialization for 
fixed-length records, 'multiple’ 

AOX 

1 




CRCX £ OSCL: initialization for 
fixed-length records, 'single' 

AOY 

1 




CRCX £ OSCL: initialization for var. 
records, 'multiple' 

AOZ 

1 




CRCX £ OSCL: initialization for var. 
record s, 'single' 

A01 

0 

(Opt) 

sort 

Optimize disk unit assignment 

A02 

0 

(Opt) 

sort 

Optimize tape unit assignment 

A04 

0 

(Opt) 

all 

D3.4 

Generate extract routine (part 2) 

A05 

0 

(Opt) 

all 

D3.4 

Generate extract routine (part 3) 

APA 

1 




Write tape 

APB 

1 




Write disk 

APC 

1 




Open files (and call checkpoint module) ; 
skip records on SORTIN 

APD 

2 




Write tape 

APE 

2 




Write disk 

APF 

3 

merge 


N3.3 

Generate DCBs, DCB addresses 

APG 

1 



N3.1 

Allocate storage for I/O buffers, RSA, 
(three, control blocks, etc.) 

APH 

2 



N3.2 

Allocate storage for I/O buffers, control 
blocks, etc. 

API 

3 

all 


N3.3 

Allocate storage for I/O buffers, control 
blocks, etc. 

APJ 

2 




Open files (and call checkpoint module) 

APK 

3 

sort 


N3.3 

For tape: generate DCBs, IOBs, DCB 
addresses 

APL 

1 



N3.1 

CRCX fi OSCL: allocate storage for I/O 
buffers, RSA, control blocks, etc. 

API 

1 




Specify area for DCB list for OPEN 

AP2 

2 




Specify area for DCB list for OPEN 

AP3 

3 




Specify area for DCB list for OPEN 

BGB 

0 

(Def) 

sort D3.4 

CRCX: calculate B and G 

CHK 

1. 

,2,3 sort 


Checkpoint routine for sorting applications 

DM4 

All 



Hexadecimal and decimal conversion 

EX1 

1 




Act as link between user routines and 
program exits. 

EX2 

2 




Routines which need linkage editing are 
linkage edited together with these modules: 

EX3 

3 

all 



phase 1 routines with EX1, and so on. 

RBA 

1 



N4.11 

CRCX £ OSCL: block var. record 

RBB 

1 



N4.11 

Block fixed-length records with inline move 

RBC 

1 



N4.11 

Block fixed-length records with link to 
multiple move 

RBE 

1 



N4.11 

Block var. records with move 

RBF 

1 



N4.11 

Move var. records 

RBG 

2 



N3.2 

Block or deblock fixed-length records with 


in-line move (no exits) 
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I 


CSECT 

Name 

Used in 
Phase: 

MO 

Diag 

RBH 

2 


N3.2 

RBI 

2 


N3.2 

RBJ 

2 


N3.2 

RBK 

2 


N3.2 

RBL 

3 all 


N3.3 

RBM 

3 all 


N3.3 

RBN 

3 all 


N3.3 

RBO 

3 all 


N3.3 

RBP 

3 all 


N3.3 

RBT 

2 


N3.2 

RBU 

2 


N3.2 

RBV 

2 


N3.2 

RBW 

2 


N3.2 

RBX 

2 


N3.2 

RBY 

1 


N4.11 

RBZ 

1 


N4.11 

RCA 

All but 0 (Def) 

RCB 

All but 0 (Def) 

RCD 

0 (Def) 

all 

D3.4 

RCI 

0 (Def) 

all 


RCJ 

0 (Opt) 

sort 


RCK 

0 (Opt) 

sort D3.4 

RCL 

0 (Def) 

merge D3.4 

RCM 

0 (Def) 

all 

D3.4 

RCN 

0 (Def) 

sort D3.4 

RCO 

0 (Def) 

all 


RCP 

0 (Def) 

all 

D3.4 

RCQ 

0 (Def) 

all 


RCR 

0 (Def) 

sort 

D3.4 

RCS 



D3.4 

RCT 

1,2,3 

all 


RCU 

0 (Def+Opt) all 

RCV 

1,2,3 

all 


RCX 

0 (Def) 

all 


RCZ 

0 (Opt) 

all 


RCI 

0 (Opt) 

all 

D3.4 

RC2 

0 (Def) 

all 


RC3 

0 (Def) 

all 



Purpose 


Block or deblock fixed-length records with 
link to multiple move (no exits) 

Block or deblock var. records with move 
(no exits) 

Block or deblock fixed-length records 
(exits used) 

Block or deblock var. records (exits used) 

Block fixed-length records with in-line 
move (no e xi ts) 

Block fixed-length records (exits used) 
Block var. records (no exits) 

Block var. records (exits used) 

Block fixed-length records with link to 
multiple move 

CRCX S OSCL: block/deblock fixed-length 
records up to 256 bytes (no exits) 

CRCX & OSCL: block/deblock fixed-length 
records >256 bytes (no exits) 

CRCX 6 OSCL: block/deblock var. records 
(no exits) 

CRCX S OSCL: block/deblock fixed-length 
records (exits used) 

CRCX 6 OSCL: block/deblock var. records 
(exits used) 

CRCX 6 OSCL: block fixed-length records 
up to 256 bytes 

CRCX 6 OSCL: block fixed-length records 
>256 bytes 

Specify PPI area 

System interface 

Scan MODS control statement 

Identify input, output and work data sets 

and their characteristics 

Check disk capacity 

BALN (di sk) : optimi ze B and 6 

Merge-only optimization 

System interface 

Calculate bin sizes 

System interface controlling phase 0 (Def) 
(and linkage editor) 

List exit routines to be linkage edited 
Specify input area for control statements 
Calculate B and 6 for tape sort and choose 

optimal technique; interpret MODS statement 
Free storage between phases 
Contain error messages for phase 0 
System interface for processing records 
Contain messages for MODS card errors 
Control of phase 0 (Opt) 

Move CPI information to PPI 

Calculation for extract 

Contains messages for MODS card scanning 
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CSECT 

Name 

Used in 
Phase: 

MO 

Diag 

Purpose 

RC4 

0 (Opt) sort 


Calculate and optimize disk work areas 

RC6 

1 

N3.1 

Determine modules needed in phase 1 

RC7 

2 N3 

.2,N3. 1 

Determine modules needed in phase 2 

RC8 

3 all 

N3.3 

Determine modules needed in phase 3 

RC9 

1,2,3 all 

N3.3, 

N3.2, 

N3.1 

Load necessary modules for each phase 

RDB 

1 

N3.1 

Deblock fixed-length records with in-line 
move (no exits) 

RDC 

1 

N3.1 

Deblock fixed-length records with link to 
multiple move (no exits) 

RDD 

1 

N3.1 

Deblock fixed-length records (exits used) 

RDB 

1 

N3.1 

Deblock var. records (exits used) 

RDG 

1 

N3.1 

Deblock var. records (no exits) 

RDH 

3 sort 

N3.3 

Deblock fixed-length records (for disk and 
read-backward tape) 

RDI 

3 sort 

N3.3 

Deblock var. records 

RDJ 

3 merge 

N3.3 

Deblock 

RDL 

2 


Set up deblock area 

RDP 

1 

N3.1 

CRCX 6 OSCL: deblock fixed-length records uj 
to 256 bytes (no exits) 

RDQ 

1 

N3.1 

CRCX 6 OSCL: deblock fixed-length records 
up to 256 bytes fro exits) 

RDR 

1 

N3.1 

CRCX 6 OSCL: deblock fixed-length records 
(exits used) 

RDS 

1 

N3.1 

CRCX S OSCL: deblock variable records 
(exits used) 

RDT 

1 

N3.1 

CRCX 6 OSCL: deblock var. records (no exits) 

RDO 

3 merge 

N3.3 

Deblock (exits used) 

RDX 

3 sort 

N3.3 

Deblock fixed-length records 
(for read-forward tape) 

RGB 

2 

N3.2 

Read tape backwards 

RGC 

2 

N3.2 

Read disk 

RGD 

3 sort 

N3.3 

Read tape backwards 

RGE 

3 sort 

N3.3 

Read disk 

RGF 

3 merge 


Indicate input end-of-file 

RGL 

2 

N3.2 

Read tape forward 

RGM 

3 sort 

N3.3 

Read tape forward 

RGV 

1 sort, 

3 merge 

N3.1, 

N3.3 

VSAM read 

RMA 

1 


Contain messages for phi running modules 

RMB 

2 


Contain messages for ph2 running modules 

RMC 

3 all 


Contain messages for ph3 running modules 

ROA 

1 

N4.11 

Sort fixed-length records, 'multiple' 

(not POLY) 

ROB 

1 

N4.11 

Sort fixed-length records, 'single' 

(not POLY) 

ROC 

1 

N4.11 

Sort var. records, 'multiple* (not POLY) 

ROD 

1 

N4.11 

Sort var. records, 'single* (not POLY) 

ROE 

1 

N4.11 

POLY: sort fixed-length records, 'multiple' 

ROF 

1 

N4.11 

POLY: sort fixed-length records, 'single* 

ROG 

1 

N4.11 

POLY: sort var. records, 'multiple* 
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CSECT 

Used in 

MO 

Purpose 

Name 

Phase: 

Diag 


ROH 

1 

N4.11 

POLY: sort var. records, ’single' 

ROI 

1 

N4.12 

BALN (tape): sort algorithm 

ROJ 

1 

N4.12 

POLY: sort algorithm 

ROK 

1 

N4.12 

BALN (disk): sort algorithm 

RON 

1 

N4.12, 

OSCL: sort algorithm; initiate checkpoint 



N3.2 

operations 

ROP 

2 £ 3 all 

N3.2, 

N3.3 

Merge records 'multiple* 

ROQ 

2 £ 3 all 

N3.2 

N3.3 

Merge records, 'single* 

ROR 

2 

N3.2 

BALN (tape): merge algorithm 

ROS 

2 

N3.2 

POLY: merge algorithm 

ROT 

2 

N3.2 

BALN (disk): merge algorithm 

ROH 

1 


CRCX £ OSCL: sort fixed-length records, 
'multiple' 

ROX 

1 


CRCX £ OSCL: sort fixed-length records, 

• single' 

ROY 

1 


CRCX £ OSCL: sort var. records, 'multiple' 

ROZ 

1 


CRCX £ OSCL: sort var. records, 'single' 

RPA 

1 

N4.12, 

N3.2 

Write tape 

RPB 

1 

N4.12 

Write disk 

RPC 

1 

N3.1 

End-of-phase housekeeping (not CRCX 
or OSCL) 

RPD 

2 

N3.2 

Write tape 

RPE 

2 

N3.2 

Write disk 

RPF 

2 

N3.2 

End-of-phase housekeeping (not CRCX 
or OSCL) 

RPG 

3 all 

N3.3 

Open output; end-of-phase housekeeping 
procedures 

RPM 

1 £ 2 

N3.2 

OSCL: end-of-phase housekeeping 

RPV 

3 all 

N3.3 

VSAM write 

8BN 

3 all 

N3.3 

Block var. spanned records (no exits) 

8 BO 

3 all 

N3.3 

Block var. spanned records (exits used) 

8CI 

0 (Def) all 


Contain tables and constants for RCI 

8CK 

0 (Opt) sort 


BALN (disk) timing estimate routine 

8CR 

3 merge 


Checkpoint routine at end of output volume 

8DJ 

3 merge 

N3.3 

Deblock variable-length spanned records 
(no exits) 

8GB 

2 

N3.2 

CRCX read 

8GC 

3 sort 

N3.3 

CRCX read 

80N 

1 

N4.12, 

CRCX sort algorithm 



N3.2 


8PA 

1 £ 2 

N4.12, 
N3.2 

CRCX write 

8PM 

1 £ 2 

N3.2 

CRCX end-of-phase housekeeping 

9BN 

3 all 


Block var. spanned records, no exits 
(assignment) 

9 BO 

3 all, 


Block var. spanned records, exits used 


(assignment) 
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CSECT Used in MO Purpose 

Name Phase: Diag 


9DJ 

3 merge 

Assignment deblock variable-length spanned 
records (no exits) 

9GB 

2 

CRCX read assignment 

9GC 

3 sort 

CRCX read assignment 

9GN 

1 

N3.1 CRCX: generate DCBs, OBs, ECBs, alternate 

CCW pointers 

90N 

1 

CRCX algorithm assignment 

9PA 

1 6 2 

CRCX write assignment 
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Section 5: Data Areas 


| The program makes extensive use of a large data area. For Blockset 
j applications the area is called COMMON* and its layout is defined in the 
| DSECT COMMON* for Peerage and Vale applications the area is called 
COMMA* and its layout is defined in the DSECT ICECOMMA. For other 
applications the information in COMMA is moved in phase 0 to a 'control 
phase information area* , the CPI ■, and thence to a 'phase-to-phase 
information area', the PPI* the DSECT for which resides in module 
ICERCA. How to list COMMA is described in Section 6. The CPI and PPI 
are described in detail below together with Module ICEAM1, which 
contains CSECT ICEAM1* which contains the default values specified when 
the program was installed. 

For the CPI and PPI a listing is given showing the position* length* 
name and contents of each field. For the PPI a 'map' is also provided, 
as well as an index. 

If you know the name of a field in the CPI or the PPI, but not its 
position* you can find its displacement from the cross-reference tables 
in Section 6. 
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I Blockset Area (COMMON) 


| This area is allocated by ICEMAN and is used by all Blockset modules, 
j It is described in the DSECT COMMON. The program uses register 13 as a 
j base register for COMMON. 


| COMMON PRINTOUT 


DISPL NAME 


DESCRIPTION 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


0000 

COMMON 

DSECT 




X 


SAVE AREA 



0000 


DS 

3F 

START 

OF OS SAVE AREA 

oooc 

COMSAVEO 

DS 

15F 

LEVEL 

ZERO SAVE AREA 

0048 

C0MSAVE1 

DS 

13F 

LEVEL 

ONE SAVE AREA 

007C 

C0MSAVE2 

DS 

13F 

LEVEL 

TWO SAVE AREA 

00B0 

C0MSAVE3 

DS 

I3F 

LEVEL 

THREE SAVE AREA 


X 


FOUNDATION 



00E4 

COMFOUND 

DS 

OF 




x PRESET 

DEFAULTS 



o 

o 

m 

COMFAULT 

DS 

OF 




x VERSION NUMBER OF COMMON 



COMVERSE 

EQU 

3 

CURRENT COMMON VERSION NUMBER 

0 0E4 

COMVERZN 

DS 

H 

CONTAINS COMVERSE 


x MODE INDICATORS 


0 0E6 

COMVOKED 

DS 

C 

USER INVOKED STATUS 

0 0E7 

COMMODE 

DS 

c 

SORT OR MERGE MODE INDICATOR 

0 0E8 

COMCOBIN 

DS 

c 

COBOL INPUT MODE OPTION 

00E9 

COMCOBUT 

DS 

c 

COBOL OUTPUT MODE OPTION 

0 0EA 

COMRECFM 

DS 

c 

SORT RECORD FORM 

00EB 

COMMNOGO 

DS 

c 

ERROR ENCOUNTERED INDICATOR 

00 EC 

COMABEND 

DS 

c 

ABDUMP DD ENCOUNTERED 

0 0 ED 

COMSYSTM 

DS 

c 

SYSTEM TYPE FROM CVT 

00EE 

COMMTEST 

DS 

c 

TEST STATUS INDICATOR 


COMMT190 

EQU 

128 

ISSUE 190 MESSAGES 


COMMTSEQ 

EQU 

64 

SEQUENCE CHECK SORTOUT 


COMMSNAP 

EQU 

32 

SNAP WRITEBACK BLOCKS 


COMMTVER 

EQU 

32 

VERIFY BIN COUNT 


COMFLAG 

EQU 

16 

TRACE INPUT BLOCKS 


COMMTPHO 

EQU 

8 

ISSUE PHASE0 MSGS 

00EF 

COMINOUT 

DS 

c 

COMMON IN/OUT DATA SET 

0 0F0 

C0MI0TYP 

DS 

C 

V = VIRTUAL, R = REAL 

OOFl 

C0ME0V 

DS 

C 

END OF VOLUME ON S0RTIN INDICATOR 

00F2 

C0ME0F 

DS 

C 

END OF FILE ON SORTIN INDICATOR 

OOF3 

COMSKEYS 

DS 

C 

SECONDARY KEYS PRODUCED 

0 0F4 

COMPMODE 

DS 

C 

* L’ = LOW, ’H’ = HIGH. 

0 0F5 

COMSKIPM 

DS 

C 

•Y* = SKIP INTERMEDIATE MERGE 


* MESSAGE 

CSECT 


0 0F8 

C0MDIAGS 

DS 

F 

DIAGNOSTIC LIST ADDRESS 


* CONSTANTS 


OOFC 

C0MINUS4 

DS 

F 

MINUS 4 

0100 

C0MINUS8 

DS 

F 

MINUS 8 
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DISPL NAME 


DESCRIPTION 


USER SPECIFIED OPTIONS 


COMOPTNS DS OF 

x ALTERNATE SORT NAME 

COMMXCTL DS CL8 

X WTO OPTIONS 


COMOPWTO DS CL12 

* STORAGE OPTIONS 

COMAXLIM DS F 

COMMAIN DS F 

COMSERVE DS F 

X DDNAME OPTIONS 

COMSPFIX DS CL4 

COMSYSUT DS CL8 

COMCSYSO DS CL8 

X SORTIN/SORTOUT MEMBER NAMES 

COMEMBRI EQU COMSYSUT 

COMEMBRO EQU COMCSYSO 

x MESSAGE CLASS OPTIONS 

COMPRINT DS C 

COMCPRNT DS C 

COMTYPE DS C 

COMLOG DS C 

X LISTING CONTROL COUNTS 

COMLCTR DS C 

COMLINES DS C 

x CONTROL CARD LIST OPTION 

COMSGLST DS C 

x MESSAGE TEXT OPTIONS 

COMPFIX DS CL3 

COMARKER DS C 

COMJOB DS C 

COMSTEP DS C 

x ABNORMAL TERMINATION OPTIONS 

COMIBEND DS C 

COMIDUMP DS C 

COMOBEND DS C 

COMODUMP DS C 


LINK PACK AREA MODE INDICATOR 


NAME TO XCTL TO 

WTO HEADER AND ROUTING 

MAX FOR SIZE=MAX 

MAX FOR SIZE= NOT SPECIFIED 

AMOUNT OF RESERVED MEMORY 

'SORT’ DD PREFIX OR ALIAS 
SYSOUT FILE NAME 
COBOL SYSOUT=A DDNAME 

SORTIN MEMBER 
SORTOUT MEMBER 

PRINT MESSAGE CLASS 
COBOL SORT MESSAGE PRINT CLASS 
TYPE MESSAGE CLASS 
LOG MESSAGE CLASS 

INITIAL LINE COUNTER VALUE 
LINES PER PAGE 

LIST CONTROL CARDS OPTION 

PREFIX NAME 

CONTROL CARD ERROR POSTION FLAG 
TYPE/LOG JOB NAME 
TYPE/LOG STEP NAME 

ABEND IF ERROR DURING INITIAL PHASE 
DUMP OPTION FOR IBEND 
ABEND IF ERROR DURING OTHER PHASE 
DUMP OPTION FOR OBEND 


COMLPA DS C 

x CONSORT SVC 

COMSVC DS H 

COMOPTZ EQU X-COMOPTNS 

*- 


IPUT AND OPUT ARE IN LPA 

SVC FOR SORT 
SIZE OF OPTIONS 


DCB POINTERS 


COMPRDCB DS F 

COMRDDCB DS F 

COMINDCB DS F 

COMUTDCB DS F 

COMWKDCB DS F 

COMO1DCB DS F 

x UNIT RECORD DECBS 
COMPRDEC DS F 

COMRDDEC DS F 

*- 


ADDRESS OF SYSOUT DCB 
ADDRESS OF SYSIN DCB 
SORTIN DCB ADDRESS 
SORTOUT DCB ADDRESS 
SORTWK OPEN LIST ADDRESS 
SORTINOl OPEN LIST ADDRESS 

ADDRESS OF SYSOUT DEC 
SYSIN DECB ADDRESS 


X 

x- 

COMLOAD DS 
COMUNLD DS 
COMKLOAD DS 
COMKUNLD DS 
COMOVREC DS 
COMLDKAD DS 
COMSTORE DS 


ADDRESSES OF VARIOUS GENERATED ROUTINES IN COMMON 

F LOAD SUBROUTINE ADDRESS 

F UNLOAD SUBROUTINE ADDRESS 

F KEY LOAD SUBROUTINE ADDRESS 

F KEY UNLOAD SUBROUTINE ADDRESS 

F ADDRESS OF RECORD MOVE ROUTINE 

F ADDRESS OF KAD LOAD ROUTINE 

F RESTORE CODE ADDRESS 
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D1SPL NAME 



DESCRIPTION 







K 


SORTIN/SORTOUT JFCB FIELDS 

0188 

COMIFORM 

DS 

C 

INPUT RECFM 

0189 

COMOFORM 

DS 

C 

OUTPUT RECFM 

018A 

COMIBIKZ 

DS 

H 

INPUT BLOCKSIZE 

018C 

C0M0BLKZ 

DS 

H 

OUTPUT BLOCKSIZE 

018E 

COMIRECZ 

DS 

H 

INPUT LRECL 

0190 

COMORECZ 

DS 

H 

OUTPUT LRECL 

0192 

COMIBLKL 

DS 

H 

INPUT FILE AVERAGE BLOCK LENGTH 

0194 

COMVOLCT 

DS 

C 

SORTIN VOLUME COUNT 


x OTHER SORTIO FIELDS 


0196 

COMINIO 

DS 

H 

MINIMUM SORTIO BUF TRANSFER COUNT 

0198 

COMAXIO 

DS 

H 

MAXIMUM SORTIO BUF TRANSFER COUNT 


X 


RECORD COUNTS 


019C 

COMFILEZ 

DS 

F 

FILE SIZE 

01AO 

COMIRECS 

DS 

F 

INPUT REC COUNT 

01A4 

COMORECS 

DS 

F 

OUTPUT REC COUNT 

01A8 

COMARECS 

DS 

F 

ADDED REC COUNT 

01 AC 

COMDRECS 

DS 

F 

DELETED REC COUNT 

01B0 

COMRUNSZ 

DS 

F 

CURRENT RUN LENGTH 

0 1B4 

COMVALCT 

DS 

F 

BVAL STANDARD COUNT 

01B8 

COMVALPR 

DS 

F 

BVAL PRIOR COUNT 


X 


OTHER COUNTS 


01BC 

COMMAINO 

DS 

OF 

SAVED INIT MAIN STORAGE VALUE 

01BC 

COMFREEB 

DS 

F 

FREE BIN COUNT 

OICO 

COMMAIN1 

DS 

OF 

SAVED MAIN STORAGE VALUE 

01C0 

COMBINSN 

DS 

F 

SELECTED BIN RECORD COUNT 

01C4 

COMRUNS 

DS 

F 

RUNS DISTRIBUTED BY INPUT PHASE 

01C8 

COMMAIN2 

DS 

OF 

USED MAIN STORAGE VALUE 

01C8 

COMRSASZ 

DS 

F 

RSA SIZE 

01CC 

COMIRSAZ 

DS 

F 

INPUT RSA SIZE 

01D0 

COMKOUNT 

DS 

F 

PRIMARY KAD COUNT 


X 


MEMORY MANAGEMENT 

FIELDS 


x FILE 

AREA POINTERS 


01D4 

COMFILEG 

DS 

F 

GET FILE AREA PTR 

01D8 

COMFILEP 

DS 

F 

PUT FILE AREA PTR 


x MAIN 

STORAGE FIELDS 


01DC 

C0MMAREA 

DS 

F 

ADDRESS OF COMMON WORK AREA 

01E0 

COMMEND 

DS 

F 

ADDRESS OF END OF COMMON WORK AREA 

01E4 

COMAVAIL 

DS 

F 

ADDRESS OF AVAILABLE COMMON 

01E8 

COMSAD 

DS 

F 

ADDRESS OF FIRST STORAGE AREA DESC 

01 EC 

COMSPACE 

DS 

F 

BYTES AVAILABLE 

01F0 

COMINGET 

DS 

F 

MINIMUM GETMAIN AMOUNT 

01F4 

COMINCOR 

DS 

F 

MINIMUM SPACE NEEDED TO SORT 

01F8 

COMSHORT 

DS 

F 

MAIN STORAGE DEFICIT 


K 


COMPARE STRUCTURE 

DATA 

01FC 

COMLISTA 

DS 

F 

LIST HEADERS 

0200 

COMLISTB 

DS 

F 

FOR MERGE SORT. 

0204 

COMTREE 

DS 

F 

LOSER TREE AREA 

0208 

COMTSIZE 

DS 

F 

OFFSET TO LAST NODE 
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DISPL NAME 


DESCRIPTION 



020C COMBLKSI DS F 

0210 COMRPB DS F 

0214 COMKPB DS F 

* KAD VALUES 

0218 COMKPFIX DS F 

021C COMKDATA DS F 

0220 COMKBLKZ DS F 


0224 C0MI0XAD DS 
0228 C0MI0XSZ DS 
022C COMLOWIO DS 
0230 COMIOLOC DS 
0234 COMWKLOC DS 


WORKFILE BLOCK SIZE 
RECORDS PER WORKFILE BLOCK 
KEYS PER WORKFILE BLOCK 

SIZE OF BIN KAD PREFIX 
SIZE OF KAD PREFIX 
SIZE OF KAD BLOCK ENTRY 


I/O TRANSFER AREA FIELDS 


ADDRESS OF IOX 

LENGTH OF IOX 

LOW I/O ADDRESS 

SORTIO DATA ADDRESS IN IOX 

SORTWK DATA ADDRESS IN IOX 


DXL LISTS 


0238 COMDXLSQ DS 
023C COMDXLIO DS 
0240 COMDXLWQ DS 
0244 COMDXLRQ DS 
0248 COMDXKEY DS 
024C COMDXSKY DS 


QUEUES 


0250 

COMAREAQ 

DS 

0254 

COMBINFQ 

DS 

0258 

COMLADFQ 

DS 

025C 

COMLADNQ 

DS 

0260 

COMIOBXQ 

DS 

0264 

COMBINSQ 

DS 

0268 

COMBINST 

DS 

026C 

COMKEYFQ 

DS 

0270 

COMCADFQ 

DS 

0274 

COMCADAQ 

DS 

0278 

COMBVDFQ 

DS 

027C 

COMBVDAQ 

DS 

0280 

COMBVDLO 

DS 

0284 

COMBVDHI 

DS 

0288 

COMKEYPQ 

DS 

028C 

COMKEYPT 

DS 

0290 

COMKEYSQ 

DS 

0294 

COMKIRRF 

DS 

0298 

COMKIRRQ 

DS 


SEQUENTIAL DXL LIST HEAD 
SORTIO CIRCULAR LIST ENTRY 
SORTWK DXL WRITE QUEUE 
SORTWK DXL READ QUEUE 
ADDRESS OF KEY AREA DXL 
SECONDARY KEY AREA DXL ADDRESS 


WORK AREA PREFERENCE QUEUE 

QUEUE OF AVAILABLE RECORD BINS 

LAD AVAILABLE LIST 

NEXT STRING LAD QUEUE 

QUEUE OF EXCP IOBS 

SELECTED BIN QUEUE 

SELECTED QUEUE TAIL 

FREE KEY HOLDER QUEUE 

FREE CAD QUEUE 

AVAILABLE CYLINDER AREA QUEUE 

FREE BVD QUEUE 

ALLOCATED BVD QUEUE 

ADDRESS OF LOW BOUNDARY VALUE DEF 

ADDRESS OF HIGH BOUNDARY VALUE DEF 

PRIMARY KEY QUEUE 

PRIMARY KEY QUEUE TAIL 

SECONDARY KEY QUEUE 

KAD IRRR HOLDER FREE QUEUE 

KAD IRRR HOLDER QUEUE 


KEY MISCELLANEOUS 



VARIOUS FULLWORD SIZES 


02AC COMBINSZ DS F 
02B0 COMWRECZ DS F 
02B4 COMDXLSZ DS F 
02B8 COMPAREZ DS F 
02BC COMIORPB DS F 


SIZE OF A RECORD BIN 

SIZE OF A WORKFILE RECORD 

SIZE OF DXL (DEPENDS ON V OR R) 

LENGTH OF COMPARE 

SORTIO REC PER BLOCK 
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DISPL NAME 


DESCRIPTION 



x - 

X 


TIOT ADDRESSES 



0200 

C0MTI0T 

DS 

F 

ADDRESS OF TIOT 


02C4 

COMSAVEI 

DS 

F 

TIOT ENTRY FORT SORTIN 


02C8 

C0MSAVE0 

DS 

F 

TIOT ENTRY FOR SORTOUT 



X DISK : 

SORTIO FIELDS 



02CC 

C0MCCHH 

DS 

F 

LATEST SORTIO CCHH 


02D0 

C0MRECN0 

DS 

2C 

LATEST R 


02D2 

C0MTRBAL 

DS 

H 

CURRENT TRACK BALANCE 


02D4 

C0MTRSAV 

DS 

H 

PREVIOUS TRACK BALANCE 


02D6 

C0MXTENT 

DS 

H 

CURRENT EXTENT 



^ ■ a u i . u i.. ' 1 

X 


WTO AREA 



02D8 

COMWTO 

DS 

F 

HEADER FOR L FORM OF WTO 


02DC 

COMWTEXT 

DS 

CL 120 

TEXT OF WTO 



COMWPFIX 

EQU 

COMWTEXT 

MESSAGE PREFIX 



COMUIMNUM 

EQU 

COMWPFIX+3 

MESSAGE NUMBER 



COMWMTAG 

EQU 

COMWMNUM+3 

MESSAGE TAG 



COMMJOB 

EQU 

COMWMT AG+2 

JOB NAME 



COMWSTEP 

EQU 

COMWJOB+9 

STEP NAME 



COMWMESS 

EQU 

COMWSTEP+9 

MESSAGE 


0354 

COMWROUT 

DS 

F 

ROUTING FOR WTO 



X 


MISCELLANEOUS 



0358 

COMDUBBL 

DS 

D 

DOUBLEWORD ALIGNED WORK AREA 


0360 

COMOLIST 

DS 

F 

OPEN LIST ADDRESS 


0364 

COMOLEND 

DS 

F 

END OF OPEN LIST 


0368 

C0MSQRT 

DS 

F 

SQUARE ROOT OF RPB 


036C 

COMIDKEY 

DS 

F 

MIDDLE KEY 



X MISCELLANEOUS BIT SWITCHES 



0370 

COMISCEL 

DS 

4C 

SWITCH VALUES 



COMISREL 

EQU 

1 

0 => RELEASE SORTWORK SPACE 



COMXSTAT 

EQU 

COMISCEL+1 

EXIT STATUS 



C0MXE15 

EQU 

1 

E15 IS PRESENT 



C0MXE35 

EQU 

2 

E35 IS PRESENT 



COMXEOl 

EQU 

4 

E01 IS PRESENT 



COMXE03 

EQU 

16 

EO3 IS PRESENT 



x MORE MISCELLANEOUS 



0374 

COMBVD 

DS 

F 

CURRENT BVD 


0378 

COMLADS 

DS 

F 

LAD AREA ADDRESS 


037C 

COMLADLM 

DS 

F 

LAD AREA LIMIT 


0380 

COMIIOB 

DS 

F 

INPUT IOB 


0384 

COMOIOB 

DS 

F 

OUTPUT IOB 


0388 

COMACE 

DS 

F 

ABNORMAL CHANNEL END 


038C 

C0MSIRRR 

DS 

F 

SECONDARY KEYFILE IRRR 


0390 

COMBOUND 

DS 

F 

COUNT OF WITHIN BOUND RECORDS 


0394 

C0MLIMIT 

DS 

F 

BOUND LIMIT 



K 


KEYFILE COUNTS AND 

LIMITS 


0398 

COMKEYPC 

DS 

H 

PRIMARY KEY COUNT 


039A 

C0MKEYSC 

DS 

H 

SECONDARY KEY COUNT 


039C 

COMKEYPN 

DS 

H 

PRIMARY KEY MINIMUM 


039E 

COMKEYPX 

DS 

H 

PRIMARY KEY MAXIMUM 


03A0 

COMKEYSX 

DS 

H 

SECONDARY KEY MAXIMUM 


03A2 

C0MINKPB 

DS 

H 

MINIMUM KEYS PER BLOCK 


03A4 

COMAXKPB 

DS 

H 

MAXIMUM KEYS PER BLOCK 
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DISPL NAME 


DESCRIPTION 



X- 

X 


MISCELLANEOUS 

HALFWORD FIELDS 

03A6 

COMKRECZ 

DS 

H 

KEY 

RECORD LENGTH 

03A8 

COMINBOF 

DS 

H 

BUFFER OFFSET FOR ASCII SORTIN 

03AA 

COMKDELT 

DS 

H 

PRIMARY KEY MULTIPLE LOAD DELTA 

03AC 

COMLSTAR 

DS 

H 

1ST 

TWO BYTES OF JFCLSTAR 

03AE 

COMWDXLS 

DS 

H 

WORKFILE DXLS 

03B0 

COMCYLNO 

DS 

H 

LOGICAL CYLINDER ASSIGNMENT CTR 

03B2 

COMPRIZE 

DS 

H 

PRIOR BLOCK SIZE 

03B4 

COMBVCTR 

DS 

H 

HIGH 

BV XFER COUNT 

03B6 

COMBVLIM 

DS 

H 

HIGH 

BV XFER LIMIT 


X 


KEY MOVES AND 

COMPARES - 

SEE TABLE IN KEYMVCLC 

03B8 

COMPMOVE 

DS 

OH 



03B8 

COMXCRUN 

DS 

CL6 

XC 

0(,R1),0(R1) 

03BE 

COMOVKEY 

DS 

CL6 

MVC 

0C,R1),0CR15) 

03C4 

COMPAB 

DS 

CL6 

CLC 

8(,R4),0CR3) 

03CA 

COMPCOPA 

DS 

CL6 

CLC 

4 C,R4),0(R14) 

03D0 

COMPCOPB 

DS 

CL6 

CLC 

4(,R5),0CR14) 

03D6 

COMPCOPC 

DS 

CL6 

CLC 

0 ( , R4),0C R14 3 

03DC 

COMPOUND 

DS 

CL6 

CLC 

0( ,R2),0(R8) 

03E2 

COMPICK 

DS 

CL6 

CLC 

0(> R2),BVDKEY-BVDSECT(R4) 


03E8 

COMPARE 

D5 

CL6 


CLC 0(,R14),0CR15> 

03EE 

COMPSLAB 

DS 

CL6 


CLC 4(,R4),4(R5) 


COMPSLAK 

EQU 

COMPCOPA 




COMPSLBK 

EQU 

COMPCOPB 



03F4 

COMPALTA 

DS 

CL6 


CLC 4(,R2),0CR4) 

03FA 

COMPALTB 

DS 

CL6 


CLC 4(,R3),0CR4) 

0400 

COMOVKAD 

DS 

CL18 


MVC 0(KADLIST,R1),0(R15) 


X 


BLOCK READ 

CHECK 

FIELDS 

0418 


DS 

CD 



0418 

COMBLOKO 

DS 

F 


OUTPUT BLOCK COUNTER 

041C 

COMBLOKI 

DS 

F 


INPUT BLOCK COUNTER 

0420 

C0MHA5H 

DS 

F 


SUM OF OUTPUT COUNT IDS 

0424 

C0M2NDRY 

DS 

F 


SECONDARY ALLOCATION WORD 

0428 

COMNMAX 

DS 

F 


ESTIMATED NMAX VALUE 


X 


PHASE LOCAL 

WORK 

AREA 

042C 

COMLOCAL 

DS 

22F 



0484 

C0MCL05E 

DS 

OF 


CLOSE LIST AREA 


COMIDSNM 

EQU 

COMCLOSE 


INPUT DATA SET NAME 


X 


TREE/MERGE 

ROUTINE SPACE 


x MERGE/SORT INITIALIZATION 

ROUTINE 

0484 

COMERGEI 

DS 

28F 




X MERGE/SORT ROUTINE 



04F4 

COMERGES 

DS 

48F 




COMTABLE 

EQU 

COMERGES-4 


TRANSLATE/SIZE TABLE 


X TREE 

INITIALIZATION 

ROUTINE 

05B4 

COMTREEI 

DS 

36 F 




X TREE 

ADD ROUTINE 



0644 

COMTREEA 

DS 

40F 




X TREE 

DELETE ROUTINE 



06E4 

COMTREED 

DS 

16F 




X TREE 

REPLACE/SELECT 

ROUTINE 

0724 

C0M43LST 

DS 

OF 


LIST AREA FOR CON043A MSGS 
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DISPL NAME DESCRIPTION 


0724 COMTREES DS 20F 

x COMPARE INSTRUCTION LIST 

0774 COMPLIST DS 30F 

07EC COMPLAST DS F LAST LIST ENTRY 

x LONG COMPARE 

07F0 COMPLONG DS 0CL6 LONG COMPARE 

x OFFSET LIST TO LAD FETCHES IN TREE CODE 

07F0 COMPLADS DS 6F 

x- 

x VARIOUS WORK VARIABLES 

x--- 

X DYNAMIC ALLOCATION PARAMETERS 

0808 ORG COMTABLE+256 SKIP OVER TABLE 

05F0 COMDYNAM DS CL8 DYNALLOC UNIT NAME 

05F8 COMDYNUM DS F DYNALLOC COUNT 

05FC COMVIO DS C VIO/NOVIO SWITCH 

x ALTSEQ TRANSLATION TABLE 

05FD COMALTAB DS CL256 

06 FD ORG 

X E35 WORK AREAS 

0808 COMOJFCB DS F ADDRESS OF SORTOUT JFCB 

080C COMLADAD DS F BLOCKED LAD ADDR/ADDRCE35) 

0810 COMRTAIL DS F LAST FOUR BYTES OF RECORD 

x USED FROM ICEDYNA UNTIL ECEEXIN 


0814 

COMDYNER 

DS 

F 

RETURN CODE FROM DYNALLOC 


X SYSTEM 

RESERVED 


0818 

COMSYSRV 

DS 

F 

SYSTEM RESERVED 

081C 

COMTRANS 

DS 

X 

TRANSFER INDICATION FOR ICEMESS 

081D 

COMCHALT 

DS 

CL1 

A=TRAN5LATE AQ ONLY 


X 



C=TRANSLATE CH AND AQ 

081E 

COMCHECK 

DS 

CL1 

Y=RECORD COUNTERS CHECKED 


X 



N=RECORD COUNTERS NOT CHECKED 

081F 

COMSMF 

DS 

C 

•S' = SHORT SMF RECORD 


X 



•F’ = FULL SMF RECORD 


X 



'F' NOT VALID FOR FLR-BLOCKSET 


X 



•N» = NO SMF RECORD 

0820 

COMMXBLK 

DS 

F 

MAX SORTIN BLKSIZE FOR SMF 

0824 

COMTTIME 

DS 

F 

CPU TIME WORK AREA FOR SMF 

0828 

C0MMSGSW 

DS 

X 

INFORMATION MSG FLAG BYTE 


C0MB37R 

EQU 

X’80’ 

B37 INFO MESSAGE FLAG MASK 

0829 

C0MVBLKS 

DS 

C 

N=BYPASS VLR BLOCKSET 

082A 

COMBLKS 

DS 

C 

N=BYBASS FLR BLOCKSET 

082B 

C0MCNTL 

DS 

C 

X' 00'=SORTCNTL NOT PRESENT 

082C 

C0MTRACK 

DS 

F 

8TRACKS ALLOCATED FOR SORTWK 

0830 

COMAVGLN 

DS 

F 

AVERAGE RECORD LENGTH VALUE 


X 


TRACE SEGMENTS 

0834 

COMTRACE 

DS 

IF TRACE 

X' 01'-X'OF' E15/E35 IN/OUT AREA RECOR LEVEL 

0838 


DS 

8F TRACE 

X ’ 10’-X'IF' BLOCK LEVEL ENTRIES 

0858 


DS 

8F TRACE 

X'20 1 -X'9F' BLOCKSET LEVEL ENTRIES 

0878 


DS 

15F TRACE 

X'AO'-X'FF* MODULE AND MAIN LOOPS 

08B4 


ORG 

COMTRACE 


0834 

COMOPLOC 

DS 

20F 

OPTION STATEMENT WORK AREA 

0884 


ORG 

> 



X 


MORE SAVE 

AREAS 

08B4 

COMRSAV1 

DS 

F 

REGISTER SAVE AREA 

08B8 

C0MRSAV2 

DS 

F 

REGISTER AREA 

08BC 

COMMSGPR 

DS 

H 

MESSAGE PARAMETER SAVE AREA 
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DISPL NAME DESCRIPTION 







X 


VLR FIELD AREA 


08C0 

COMIRES 

DS 

F 

START OF RESIDUAL INPUT DATA 

08C4 

COMURES 

DS 

F 

START OF RESIDUAL WORK DATA 

08C8 

COMORES 

DS 

F 

START OF RESIDUAL OUTPUT DATA 

08CC 

COMWKSIZ 

DS 

F 

SIZE OF WORK AREA 

08D0 

COMFL00R 

DS 

F 

PAGE SIZE COMPLEMENT 

08D4 

COMDELTA 

DS 

F 

RESIDUE DELTA 

08D8 

COMINSEG 

DS 

F 

MIN SIZE FOR 1ST SEGMENT 

08DC 

C0MWKRSA 

DS 

F 

WORK BUF TO RSA ROUTINE 

08EO 

COMRSAWK 

DS 

F 

RSA TO WORK BUF ROUTINE 

08E4 

COMRSTOR 

DS 

F 

RESTORE LIST POINTER 

OSES 

COMFSTOR 

DS 

F 

FIXED RESTORE ROUTINE ADDRESS 

08EC 

COMCENT 

DS 

F 

PER CENT RSA UTILIZATION 

08F0 

COMUNBAL 

DS 

F 

ADDRESS OF UNBALANCED MERGE 

08F4 

COMLIST 

DS 

F 

UNBALANCED LIST HEAD 

08F8 

COMLEND 

DS 

F 

UNBALANCED LIST END 

08FC 

COMPEERS 

DS 

F 

PEERAGE ACCUMULATOR 

0900 

COMLOKEY 

DS 

F 

POINTER TO LOW LIMIT KEY AREA 

0904 

COMTOTAL 

DS 

F 

TOTAL RSA BYTES NOT IN OUTPUT RUN 

0908 

C0MPARZ6 

DS 

F 

OFFSET IN BIN TO SEG BYTE 

090C 

COMBACK 

DS 

F 

BACKOUT RECORD’S PREDECESSOR 

0910 

COMSGTOT 

DS 

F 

TOTAL BYTES SEGMENTED 

0914 

COMUKFIL 

DS 

F 

BYTES IN WORK FILE 

0918 

COMINFIL 

DS 

F 

SORTIN BYTE COUNT 

091C 

COMUTFIL 

DS 

F 

SORTOUT BYTE COUNT 

0920 

COMESAVE 

DS 

3F 

EVENT COUNT SAVE AREA 

0 92C 

COMECTRS 

DS 

10F 

EVENT COUNT SAVE AREA 

0954 

COMKSAVE 

DS 

F 

KEY SAVE AREA ADDRESS 

0958 

COMLSTAT 

DS 

F 

LENGTH STATISTICS CTR PTR 

0 95C 

COMLSTAB 

DS 

F 

LENGTH STATISTICS TABLE 

0960 

COMEXTRA 

DS 

2F 

UNUSED WORDS 

0968 

COMFEND 

DS 

OD 

END OF FOUNDATION 


COMMVARY 

EQU 

x 

BEGINNING OF VARIABLE AREA 


END 
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Peerage and Vale Communication Area (COMMA) 


| This area is allocated by ICEDEF and is used by all Peerage and Vale 
technique modules. It is described in the DSECT ICECOMMA. The program 
uses register 13 as a base register for COMMA. 

| It can be listed as described in Section 6, 'Debugging Aids*. Such a 
listing gives not only field definitions (name, position, length, 
description) , but also current contents. 


DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 


000 

2 


CSAVE0S 

PTRC31) 

SUPERVISOR AND DM 

SAVE AREA 

048 

2 


CSAVEL1 


LEVEL 

1 ROUTINE SAVE AREA 

090 

2 


CSAVEL2 

PTRC31) 

LEVEL 

2 ROUTINE SAVE AREA 

0D8 

2 


CSAVEL3 


LEVEL 

3 ROUTINE SAVE AREA 

120 

2 


CTEMP1 

FIXEDC 31) 

klORK 

AREA 


120 

3 


CW0RK1 

FIXEDC 31) 

WORK 

AREA 


121 

4 


CTEMP124 

PTRC24) 

WORK 

AREA 


121 


5 

CW0RK124 

PTRC24) 

WORK 

AREA 


122 


6 

CTEMP115 

FIXEDC15) 

WORK 

AREA 


122 


7 

CW0RK116 

FIXEDC16) 

WORK 

AREA 


123 


8 

CTEMP108 

PTRC8) 

WORK 

AREA 


123 


9 

CW0RK108 

PTRC8) 

WORK 

AREA 


124 

2 


CTEMP2 

FIXED(31) 

WORK 

AREA 


124 

3 


CW0RK2 

FIXEDC 31) 

WORK 

AREA 


125 

4 


CTEMP224 

PTRC24) 

WORK 

AREA 


125 


5 

CW0RK224 

PTRC24) 

WORK 

AREA 


126 


6 

CTEMP215 

FIXEDC15) 

WORK 

AREA 


126 


7 

CW0RK216 

FIXEDC16) 

WORK 

AREA 


127 


8 

CTEMP208 

PTRC8) 

WORK 

AREA 


127 


9 

CWORK208 

PTRC8) 

WORK 

AREA 


128 

2 


CTEMP3 

FIXEDC 31) 

WORK 

AREA 


128 

3 


CW0RK3 

FIXEDC 31) 

WORK 

AREA 


129 


5 

CTEMP324 

PTRC24) 

WORK 

AREA 


129 


6 

CW0RK324 

PTRC24) 

WORK 

AREA 


12A 


7 

CTEMP315 

FIXEDC15) 

WORK 

AREA 


12A 


8 

CW0RK316 

FIXEDC16) 

WORK 

AREA 


12B 


9 

CTEMP308 

PTRC8) 

WORK 

AREA 


12B 


10 

CWORK308 

PTRC8) 

WORK 

AREA 


12C 

2 


CTEMP4 

FIXEDC 31) 

WORK 

AREA 


12C 

3 


CWQRK4 

FIXEDC 31) 

WORK 

AREA 


12D 

4 


CTEMP424 

PTRC24) 

WORK 

AREA 


12D 


5 

CU0RK424 

PTRC24 ) 

WORK 

AREA 


12E 


6 

CTEMP415 

FIXEDC15) 

WORK 

AREA 


12E 


7 

CW0RK416 

FIXEDC16 ) 

WORK 

AREA 


12F 


8 

CTEMP408 

PTRC8) 

WORK 

AREA 


12F 


9 

CW0RK4 08 

PTRC8) 

WORK 

AREA 


130 

2 


CW0RK5 

FIXEDC 31) 

WORK 

AREA 


134 

2 


CW0RK6 

FIXEDC 31) 

WORK 

AREA 


138 

2 


CW0RK7 

FIXEDC 31) 

WORK 

AREA 


13C 

2 


CW0RK8 

FIXEDC 31) 

WORK 

AREA 


140 

2 


CRTNADDR 


ADDR. 

OF PERMANENT 

RTNS 

140 

3 


CGETMAIN 

PTRC31) 

ADDR. 

OF ROUTINE 

GETMAINS 

144 

3 


CFRESTOR 

PTRC31) 

ADDR. 

OF ROUTINE 

FREESTOR 

148 

3 


CGALADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

GALLOCAT 

14C 

3 


CRALADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

RALLOCAT 

150 

3 


CDALADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

DALLOCAT 

154 

3 


CBALADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

BALLOCAT 

158 

3 


CTRKROUT 

PTRC31) 

ADDR. 

OF ROUTINE 

TRKROUT 

15C 

3 


CIORADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

INOUTRTN 

160 

3 


CMSGADDR 

PTRC31) 

ADDR. 

OF ROUTINE 

DIAGNOSE 

164 

3 


CTIME 

PTRC31) 

ADDR. 

OF ROUTINE 

TIMING 

168 

3 


CRECHAIN 

PTRC31) 

ADDR. 

OF ROUTINE 

RECHAIN 

16C 

3 


CSTAADDR 

PTRC31) 

ADDR 

OF INIT STAE 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

170 

2 

CXLIST 

PTRC31) 

ADDRESS OF EXIT LIST 

174 

2 

COMLOCSV 

FIXEDC 31) 

COREPARM SAVE FOR ICEDEV 

178 

2 

COMMDBLE 

BDYCDWORD) 

DOUBLEWORD-ALIGNED WORKAREA 

178 

3 

CXCCOUNT 

FIXEDC31) 

WORK AREA FOR EXTRACT 

178 

4 

CMOVEEND 

PTR(31) 

WORK AREA FOR MOVECOMP 

178 

5 

CEQDISPL 

PTR(31) 

WORK AREA FOR EXTRACT 

17C 

3 

CXCLNG 

FIXEDC 31) 

WORK AREA FOR EXTRACT 

17C 

4 

CMOVEH 

PTRC31) 

WORK AREA FOR MOVECOMP 

180 

2 

CFRELIST 

BDY(DWORD) 

START OF FREE SPACE CHAIN 

180 

3 

CFREHEAD 

PTRC31) 

ADDR. OF FIRST FREE AREA 

184 

3 

CFREZER0 

FIXEDC 31) 

SIZE OF ZEROTH FREE AREA 

188 

2 

CADD 

PTRC31) 

ADDR. OF TREEADD ROUTINE 

188 

3 

CADDISP 

FIXEDC 31) 

TREEGEN WORK CONSTANT 

18C 

2 

CADDS 

PTR C 31) 

ADDR. OF TREEADDS ROUTINE 

18C 

3 

CIN5TRLT 

FIXEDC 31) 

TREEGEN WORK AREA 

190 

2 

CBASEMIN 

FIXEDC15) 

BASE-BIN MIN ALLOC 

194 

2 

CBINBLK 

PTRC31) 

ADDR TO BINBLK Q 

198 

2 

CBINSIZE 

PTRC31) 

R5A BIN SIZE FOR MERGING 

19C 

2 

CBLKITTR 

PTRC31) 

NEXT UNUSED ITTR 

1 AO 

2 

CBUFFER 

PTRC31) 

ADDR. OF CURRENT WORK BUF 

1A4 

2 

CBLKLSIZ 

FIXEDC 31) 

SIZE OF FREE BLOCK LIST 

1A8 

2 

CBUFPTR 

PTRC31) 

IN - PTR IN BUFF TO VLR 


3 

# 

PTRC31) 

OUT - AVAIL VLR BUFF ADDR 

1 AC 

2 

CCHIDX1 

FIXEDC 31) 

INDEX AREA 1 HEAD 

1 BO 

2 

CCHIDX2 

FIXEDC 31) 

INDEX AREA 2 HEAD 

1B4 

2 

CCHIDX3 

FIXEDC 31) 

INDEX POOL HEAD 

1B8 

2 

CCHIDX4 

FIXEDC 31) 

POOL AREA 1 HEAD 

1BC 

2 

CCHIDX5 

FIXEDC 31) 

POOL AREA 2 HEAD 

ICO 

2 

CCOH256 

FIXEDC 31) 

CONSTANT = 256 

1C4 

2 

CC0NHEG4 

FIXEDC 31) 

CONSTANT = -4 

1C8 

2 

CCORESAV 

FIXEDC 31) 

ORIGINAL SIZE PARM 


2 

x 

BDYCWORD) 

I/O INTERFACE FIELDS 

ICC 

3 

CIOHOLD 

FIXEDC 31) 

HOLD SW/Q END 

ICC 

4 

CIOINIT 

FIXEDC 31) 

ADDR OF INIT ROUT 

IDO 

3 

CIOSAV13 

FIXEDC 31) 

I/O TASK SAVE AREA 

IDO 

4 

CTFCB 

FIXEDC 31) 

TFCB CHAIN HEAD 

1D4 

2 

CCURRBLK 

PTRC31) 

ADDR TO CURR BINBLK 

1D8 

2 

CDCBLI5T 

PTRC31) 

ADDR. OF OPEN/CLOSE LIST 

1DC 

2 

CDATLOC 

BDYCWORD) 

ICEMAN BASEREGS 

1E4 

2 

CDATLEN 

FIXEDC 31) 

DATA BLOCK SIZE 

1E8 

2 

CDECAREA 

PTRC31) 

ADDR. OF SORTIN/OUT DECB 1EC 

1F0 

2 

CDELCNT 

FIXEDC 31) 

BYTES DELETE IN RSA 

1F4 

2 

CDELETE 

PTRC31) 

ADDR. OF TREELETE ROUTINE 

1F4 

3 

CBRAHCHP 

PTRC31) 

ADDR. OF TREEGEN BR-TABLE 

1F8 

2 

CDEXCTR 

FIXEDC 31) 

HI/LO INDEX COUNTER 

1FC 

2 

CDEXITTR 

PTRC31) 

INDEX BLOCK ITTR 

200 

2 

CDEXPBUF 

FIXEDC 31) 

INDEX ENTRIES PER BUFFER 

204 

2 

CDEXPTRK 

FIXEDC 31) 

INDEX ENTRIES PER TRACK 

208 

2 

CDYNAMIC 

PTRC31) 

ADDR OF UNUSED DYNAMIC AREA 

20C 

2 

CDYNWK 

CHARC8) 

DYN ALLOC DEVICE TYPE 

20C 

3 

CDYNWK1 

PTRC8) 

1ST BYTE OF DYN DEV TYPE 


3 


CHARC3) 

REST OF CDYNWK 1ST WORD 

210 

3 

CITTRA 

FIXEDC 31) 

ALTERNATE ITTR PTR 

214 

2 

CDYNNUMB 

FIXEDC 31) 

NUMB OF DYN ALLOC DEVICES 

214 

3 

CITTR 

FIXEDC 31) 

ITTR PTR TO 1ST INP STRING 

218 

2 

CDIMSHI 

FIXEDC16) 

HI CONTROL FIELD FOR IMS 

21B 

2 

CDYNLEN 

PTRC8) 

DYNALLOC FIELD LENGTH 

21C 

2 

CEBUFFRS 

FIXEDC16) 

NUMBER OF E-PHASE BUFFERS 

21E 

2 

CDEBUG 

CHARC1) 

DEBUG SWITCH BYTE 

21F 

2 

CENDMODE 

CHARC1) 

NO = UNEXPECTED SYSIN EOF 

220 

2 

CEXTRACT 

PTRC31) 

ADDR. OF EXTRACT ROUTINE 

224 

2 

CEXPAND 

FIXEDC 31) 

INT LRECL EXPAND POS OR NEG 

228 

2 

CEMERGE 

FIXEDC 31) 

MERGE ORDER - ELIMINATION 

22C 

2 

CEXITPH1 

FIXEDC 31) 

LNG OF PHI RTNS 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

230 

2 

CEXITPH2 

FIXEDC31) 

LNG OF PH2 RTNS 

234 

2 

CEXITPH3 

FIXEDC31) 

LNG OF PH3 RTNS 

238 

2 

CE18E0D 

PTR(31) 

USER EOD ADDR 

23C 

2 

CEXIT11 

BDYCWORD) 

Ell EXIT- 

23C 

3 

CE11NAME 

CHAR (8) 

NAME 

244 

3 

CE11LNG 

FIXEDC 31) 

EXIT LENGTH 

244 

4 

CEUCALL 

PTRC31) 

CALL ADDRES 

248 

2 

CEXIT15 

BDY(WORD) 

E15/E32 EXIT - 

248 

3 

CE15NAME 

CHAR(8) 

NAME 

248 

4 

CE15ADDR 

PTR(31) 

PASSED ADDRESS 

24C 

4 

CE32M0 

FIXEDC 31) 

E32 MERGE ORDER 

24D 

250 

5 

3 

CE32M024 

CE15LNG 

PTR(24) 
FIXEDC 31) 

LENGTH 

250 

4 

CE15CALL 

PTR(31) 

CALL ADDRESS 

254 

2 

CEXIT16 

BDYCWORD) 

E16 EXIT 

254 

3 

CE16NAME 

CHARC8) 

NAME 

25C 

3 

CE16LNG 

FIXEDC31) 

E16 LENGTH 

25C 

4 

CEUCALL 

PTRC31) 

CALL ADDR 

260 

2 

CEXIT17 

BDYCWORD) 

E17 EXIT 

260 

3 

CE17NAME 

CHARC8) 

NAME 

268 

3 

CE17LNG 

FIXEDC 317 

E17 LENGTH 

268 

4 

CE17CALL 

PTRC31) 

CALL ADDRESS 

26C 

2 

CEXIT18 

BDYCWORD) 

E18 EXIT 

26C 

3 

CE18NAME 

CHARC8) 

NAME 

274 

3 

CE18LNG 

FIXEDC 31) 

E18 LENGTH 

274 

4 

CEUCALL 

PTRC31) 

CALL ADDRESS 

278 

3 

CE18XLST 

PTRC31) 

ADDR TO USER XLISTC5) RTN 

27C 

3 

CE18EXL 

PTRC31) 

ADDR TO VSAM EXIT LIST 

280 

3 

CE18PSW 

PTRC31) 

ADDR TO VSAM PASSW. LIST 

284 

2 

CEXIT19 

BDYCWORD) 

E19 EXIT 

284 

3 

CE19NAME 

CHARC8) 

NAME 

28C 

3 

CE19LNG 

FIXEDC 31) 

E19 LENGTH 

28C 

4 

CE19CALL 

PTRC31) 

CALL ADDRESS 

290 

2 

CEXIT61 

BDYCWORD) 

E61 EXIT 

290 

3 

CE61NAME 

CHAR(8 ) 

NAME 

298 

3 

CE61LNG 

FIXEDC 31) 

E61 LENGTH 

298 

4 

CE61CALL 

PTRC31) 

CALL ADDR 

29C 

2 

CEXIT21 

BDYCWORD) 

E21 EXIT 

29C 

3 

CE21NAME 

CHARC8) 

NAME 

2A4 

3 

CE21LNG 

FIXEDC 31) 

E21 LENGTH 

2A4 

4 

CE21CALL 

PTRC31) 

CALL ADDR 

2A8 

2 

CEXIT27 

BDYCWORD) 

E27 EXIT 

2A8 

3 

CE27NAME 

CHARC8) 

NAME 

2B0 

3 

CE27LNG 

FIXEDC 31) 

E27 LENGTH 

280 

4 

CE27CALL 

PTRC31) 

CALL ADDR 

2B4 

2 

CEXIT31 

BDYCWORD) 

E31 EXIT 

2B4 

3 

CE31NAME 

CHARC8) 

NAME 

2BC 

3 

CE31LNG 

FIXEDC 31) 

E31 LENGTH 

2BC 

4 

CE31CALL 

PTRC31) 

CALL ADDRESS 

2C0 

2 

CEXIT35 

BDYCWORD) 

E35 EXIT - 

2C0 

3 

CE35NAME 

CHARC8 ) 

NAME 

2C0 

4 

CE35ADDR 

PTRC31) 

PASSED ADDRESS 

2C8 

3 

CE35LNG 

FIXEDC 31) 

LENGTH 

2C8 

4 

CE35CALL 

PTRC31) 

CALL ADDRESS 

2CC 

2 

CEXIT37 

BDYCWORD) 

CE37 EXIT 

2CC 

3 

CE37NAME 

CHARC8 ) 

NAME 

2D4 

3 

CE37LNG 

FIXEDC 31) 

E37 LENGTH 

2D4 

4 

CE37CALL 

PTRC31) 

CALL ADDRESS 

2D8 

2 

CEXIT38 

BDYCWORD) 

E38 EXIT 

2D8 

3 

CE38NAME 

CHARC8) 

NAME 

2E0 

3 

CE38LNG 

FIXEDC 31) 

E38 LENGTH 

2E0 

4 

CE38CALL 

PTRC31) 

CALL ADDRESS 

2E4 

2 

CEXIT39 

BDYCWORD) 

E39 EXIT 

2E4 

3 

CE39NAME 

CHARC8) 

NAME 

2 EC 

3 

CE39LNG 

FIXEDC 31) 

E39 LENGTH 

2 EC- 

4 

CE39CALL 

PTRC31) 

CALL ADDRESS 


Section 5. Data Areas 


131 




Licensed Material—Property of IBM 

Page of LY33-8042-6, As Updated 31 March 1981, By TNL LN20-9345 


DISP 

LEVEL 

LABEL 


COMMENT 

2F0 

3 

CE39EXL 

PTR(31) 

ADDR TO VSAM EXIT LIST 

2F4 

3 

CE39P5W 

PTRC31) 

ADDR TO VSAM PASSW. LIST 

2F8 

3 

CE39XLST 

PTRC31) 

ADDR TO USER XLISTC5) RTN 

2FC 

2 

CE61PARM 


E61 PARM LIST 


3 

X 

CHARC3) 

ZEROS 

2FF 

3 

CE61PCF 

CHARC1) 

CONTR FIELD NUMB 


3 

CE61PADD 

FIXEDC 31) 

REC ADDRESS 


3 

CE61PLEN 

FIXEDC 31) 

CONTR FIELD LEN 

308 

2 

CFIELDS 

FIXED(31) 

NUMBER OF CONTROL FIELDS 

30C 

2 

CFILSIZE 

FIXEDC 31) 

USER SPECIFIED FILE SIZE 

30D 

3 

CFILSZ24 

PTR(24 ) 

THREE BYTES 

310 

2 

CFILIMIT 

PTRC31) 

ADDR. OF END OF BUFFER 

314 

2 

CFREECTR 

FIXEDC 31) 

AVAILABLE RSA BIN COUNT 

318 

2 

CGMINDEX 

FIXEDC 31) 

INDEX IN GETMAIN TABLE 

31C 

2 

CMANMSG 

FIXEDC 31) 

PTR TO MSGTABLE FOR RESTORE 

320 

2 

CGENDOPT 

BDYCWORD) 

SORT GENERATED DEFAULTS: 

320 

3 

COREPARM 

FIXEDC 31) 

MAXIMUM ALLOWED 


4 

X 

CHARC1) 

SIZE OF MAIN STORAGE 

321 

4 

C0REPM24 

PTRC24) 

FOR SORT/MERGE 

324 

3 

CMAXLIM 

FIXEDC 31) 

MAX LIMIT FOR SIZECMAX) 

328 

3 

CMINLIM 

FIXEDC31 ) 

MIN VIRTUAL STRG FOR PEER 

32C 

2 

CGEND0P1 

BDYCWORD) 

SORT GEN DEFAULTS CONT: 

32C 

3 

CRESERVE 

FIXEDC 31) 

STORAGE 


4 

X 

CHARC1) 

RESERVED FOR 

32D 

4 

CRSRVD24 

PTRC24) 

CALLING PROGRAM 

330 

3 

CMSGOPTN 

CHAR C 4) 

MESSAGE OPTION 

330 

4 

CCOHSMOD 

CHARC15 

Y = MESSAGES TO CONSOLE 

331 

4 

CPRTRMOD 

CHARC 1) 

Y = MESSAGES TO PRINTER 

332 

4 

CPRINMOD 

CHARC1) 

Y = PRINT ALL MESSAGES 

333 

4 

CCRITMOD 

CHARC1) 

Y = PRINT CRITICAL MSG 

334 

3 

CEQUALS 

CHARC1) 

Y = PRESERV ORDER OF EQUALS 

335 

3 

CLISTMOD 

CHARC1) 

Y = LIST CONTROL CARDS 

336 

3 

CERRU016 

CHARC1) 

Y = CRITICAL ERROR ABEND 

337 

3 

CERRINV 

CHARC 1) 

Y = CRITICAL ERROR ABEND 

338 

3 

CSYSNAME 

CHARC8) 

NAME FOR PRINT DD CARD 

340 

3 

CVIO 

CHARC1) 

VIO UNDER MVS 

341 

3 

CEXMODE 

CHAR Cl) 

R=EXCPVR V=EXCP X=MVT 

342 

3 

CRESDNT 

CHARC1) 

A=ALL M=MAN N=NONE 

343 

3 

CRELSE 

CHARC1) 

Y=RELEASE WORKSPACE 

344 

3 

CSECALC 

CHARC1) 

Y=AUT0M. SEC. ALLOC. 

345 

3 

CVERIFY 

CHARC 1) 

Y=VERIFY OUTPUT RECS 

346 

3 

CBLKSET 

CHARC1) 

Y=BLOCKSET MAY BE USED 

347 

3 

CCHALT 

CHARC1) 

C=TRANSLATE CH AND AQ 
A=TRANSLATE AQ ONLY 

348 

3 

CSVC 

PTRC16) 

SVC INSTRUCTION 

34A 

3 

CCHECK 

CHARC1) 

Y=CHECK COUNTERS 

N=C0UNTER CHECK SUPPRESS 

34B 

3 

CSMF 

CHARC1) 

S=SHORT SMF RECORD 

F=FULL SMF RECORD 

34C 

3 

CVBLKSET 

CHARC 1) 

N =BYPASS VLR-BLOCKSET 

Y =VLR-BLOCKSET MAY BE USED 

34D 

2 

CSTAE 

CHARC1) 

Y = STAE WANTED AT ABEND 

34E 

2 

CVIOREC 

CHARC1) 

VIO OR TAPE REC 

352 

2 

X 

CHARC 2) 

RESERVED 

2 

CIDXPLB 

FIXEDC15) 

BLOCKS/LOGIC INDEX 

354 

2 

CGETMTMP 

PTRC31) 

ADDR. OF TEMP. GETM. AREAS 

354 

3 

CGETTMP 

PTRC31) 

ALTERNATE NAME 

358 

2 

CGETREC 

PTRC31) 

ADDR. OF INPUT GET ROUTINE 

358 

3 

CTIOTIN 

PTRC31) 

PTR TO INPUT DD NAME (DEF) 

35C 

2 

CGETPRM 

PTRC31) 

PERM AREAS CHAIN 

360 

2 

CHECKDCB 

FIXEDC 31) 

CHECKPOINT DCB POINTER 

364 

2 

CHKTTSTR 

PTRC31) 

CHKPT ITT SAVE AREA 

368 

2 

CHBUF1 

FIXEDC 31) 

INDEX HDR BFR ADDR 

36C 

2 

CHKBLK 

FIXEDC 31) 

TOTAL BLKS EST FOR PRIM EXT 

370 

2 

CINSIZE 

FIXEDC 31) 

SORTIN LOGICAL RCD LENGTH 

374 

2 

CIBUFFER 

PTRC31) 

ADDR. OF INPUT INDEX BUFFER 

378 

2 

C1BSPACE 

FIXEDC 31) 

INPUT BFR SPACE 

37C 

2 

CINDEX 

PTRC31) 

ADDR. OF INPUT INDEX ENTRY 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

380 

2 

CINDEXHI 

PTRC31) 

ADDR. OF END OF INDEX BUF 

384 

2 

CIDEXSIZ 

FIXED(31) 

INDEX ENTRY SIZE 

388 

2 

CITTFQ 

PTRC31) 

HEAD OF FREE TRACK HOLDERS 

388 

3 

CSAVREG7 

FIXED(31) 

SAVE INPUT PTR CICELIM) 

38C 

2 

CITTWQ 

PTR(31 ) 

HEAD OF AVAIL. TRACK QUEUE 

38C 

3 

CONBLKSZ 

FXXEDC15) 

BLKSIZE OF 1-ST SORTIN FILE 

390 

2 

CIDXLEN 

FIXEDC 31) 

INDEX BLOCK SIZE 

394 

2 

CINLOC 

FIXED(31) 

ADDR TO INPUT REC 

398 

2 

CKEYSIZE 

FIXED(31) 

SIZE OF CONTROL WORD 

39C 

2 

CLOCSIZE 

BDY(WORD) 

TABLE FOR VARIABLE GETMAIN 

39C 

3 

COMLOC 

PTR(31) 

GETMAINED CHAIN 

3A0 

3 

COMSIZE 

FIXEDC31) 

SIZE OF RETURNED STORAGE 

3A4 

2 

CBASESIZ 

FIXEDC 31) 

BASE-BIN SIZE 2PTM411M 

3A8 

2 

CLASTIME 

FIXEDC 317 

LAST ENTRY TO REAL TIME RTN 

3AC 

2 

CLOCKS 


TIME ACCUMULATORS 

3AC 

3 

CLOCKO 

FIXEDC 31) 

C-PHASE ELAPSED TIME 

3B0 

3 

CLOCK1 

FIXEDC 31) 

C-PHASE CPU TIME 

3B4 

3 

CL0CK2 

FIXEDC 31) 

P-PHASE ELAPSED TIME 

3B8 

3 

CL0CK3 

FIXEDC 31) 

P-PHASE CPU TIME 

3BC 

3 

CL0CK4 

FIXEDC 317 

R-PHASE ELAPSED TIME 

3C0 

3 

CL0CK5 

FIXEDC 31) 

R-PHASE CPU TIME 

3C4 

3 

CL0CK6 

FIXEDC 315 

E-PHASE ELAPSED TIME 

3C8 

3 

CL0CK7 

FIXEDC 31) 

E-PHASE CPU TIME 

3CC 

3 

CL0CK8 

FIXEDC 31 ) 

SPECIAL CLOCK 0 

3D0 

3 

CL0CK9 

FIXEDC 31) 

SPECIAL CLOCK 1 

3D4 

3 

CLOCK10 

FIXEDC 317 

SPECIAL CLOCK 2 

3D8 

3 

CL0CK11 

FIXEDC 31) 

SPECIAL CLOCK 3 

3DC 

3 

CL0CK12 

FIXEDC 31) 

SPECIAL CLOCK 4 

3E0 

3 

CL0CK13 

FIXEDC 31) 

SPECIAL CLOCK 5 

3E4 

2 

CLCNUM 

FIXEDC 31) 

NO. OF CLC-INSTR. TREEGEN 

3E4 

3 

CBLKIN 

FIXEDC15) 

INPUT BLOCKSIZE 

3E6 

3 

CLTHIN 

FIXEDC15) 

INPUT RECORD LENGTH 

3E8 

2 

CLCLTH 

FIXEDC 31) 

LENGTH LAST CLC. TREEGEN 

3E8 

3 

CRECFMIN 

CHARC1) 

INPUT RECORD FORMAT 


3 

X 

CHARC3) 

NOT USED AFTER PH 0 

3EC 

2 

CM0VEKEYL3) PTRC16 5 

CTL WORD MVC OR BAL TO RTN 

3F4 

2 

CMERGE 

PTRC31) 

ADDR. OF TRMERGE ROUTINE 

3F4 

3 

CADDTAB 

FIXEDC 31) 

TREEGEN WORK AREA 

3F8 

2 

CMSGTYPE 

PTRC31) 

DEBUG MESSAGE TYPE INDEX 

3FC 

2 

CMORETRK 

PTRC31) 

TRKS NOT TO RELEASE 

400 

2 

CMINMAX 

BDYCWORD) 

PARMS FOR VARIABLE GETMAIN 

400 

3 

CMINSIZE 

FIXEDC 31) 

MINIMUM SIZE ACCEPTED 

404 

3 

CMAXSIZE 

FIXEDC 317 

MAXIMUM SIZE WANTED 

408 

2 

CMAINSIZ 

FIXEDC 317 

SIZE OF WORKING STORAGE 

40C 

2 

CMINREC 

FIXEDC 31) 

MINIMAL RECORD SIZE 

4 0 E 

3 

CMINRECH 

FIXEDC15) 

HALF-WORD 

410 

2 

CMODEVAL 

FIXEDC 31) 

MODAL RECORD SIZE 

412 

3 

CMODVALH 

FIXEDC15) 

HALF-WORD 

414 

2 

CMODSTM 

BDYCWORD) 

MODS STATEMENT - 

414 

3 

CMODSTRT 

PTRC31) 

STARTING BYTE 

418 

3 

CMODSEND 

PTRC31) 

ENDING BYTE 

41C 

2 

CMODULE 

CHARC8) 

MOD TO BE CALLED 

41C 

3 

CLINK 

FIXEDC 31) 

ZERO IF NO MORE MOD TO CALL 

41F 

4 

CM0DNAME 

CHAR C 3) 

SIGNIFICANT PART OF MODNAME 

424 

2 

CMOVERBC 3) 

PTRC16) 

RCD MVC RSA TO BUFFER 

42 A 

2 

CM0VERBC<3) PTR(16) 

RCD MVC RSA TO BUFFER(C-PH) 

430 

2 

CM0VEBRC 3) 

PTRC16) 

CCD MVC BUFFER TO RSA 

436 

2 

CMOVEBRI(3) PTRC16) 

INDEX MVC BUFFER TO RSA 

43C 

2 

CM0VERBI(3) PTRC16) 

INDEX MVC RSA TO BUFFER 

442 

2 

CMOVEE35(3) PTRC16) 

MVC FOR USER RTN AT E35 

448 

2 

CMODSLIB 

CHAR(8) 

MODS LIBRARY NAME 

450 

2 

CMSGTABL 

PTRC31) 

ADDR. ERROR MESSAGE TABLE 

454 

2 

CMOVELNG 

FIXEDC 31) 

BYTES TO MOVE TO RSA 

458 

2 

CNUMWORK 

FIXEDC 31) 

NUMBER OF WORK AREAS 

45C 

2 

CNEXTWRK 

FIXEDC 31) 

PRIM WORKD CHAIN 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

460 

2 

C0B5PACE 

FIXEDC 31) 

OUTPUT BFR SPACE 

464 

2 

COPSRTIN 

PTR(31) 

OPEN PTR USED IN DEF + CRE 

468 

2 

COUTSIZE 

FIXEDC 31) 

SORTOUT LOGICAL RCD LENGTH 

46C 

2 

COUTLIM 

PTRC31) 

ADDR. OF END OF WORK BUF 

470 

2 

COUNTERS 


EVENT COUNTERS 

470 

3 

COUNTER0 

FIXEDC 31) 

ENTRIES TO INOUTRTN 

474 

3 

C0UNTER1 

FIXEDC31) 

ISSUED EXCPS 

478 

3 

C0UNTER2 

FIXEDC 31) 

RECORDS IN 

47 C 

3 

C0UNTER3 

FIXEDC 31) 

RECORDS OUT 

480 

3 

C0UNTER4 

FIXEDC 31) 

RECORDS INSERTED 

484 

3 

C0UNTER5 

FIXEDC 31) 

RECORDS DELETED 

488 

3 

COUNTER6 

FIXEDC 31) 

SPECIAL COUNT 0 

48C 

3 

C0UNTER7 

FIXEDC 31) 

SPECIAL COUNT 1 

490 

3 

COUNTERX 

FIXEDC 31) 

TEMPORARY COUNT 1 

494 

2 

CONSW 

PTRC8) 

MISCELLANEOUS SWITCHES 

494 

3 

CSKIP 

BIT C1) 

SKIP PHASES CONTROL SWITCH 

494 

3 

CSTOSW 

BIT C1) 

TO-REG IN RCD-MOVE SAVED 

494 

3 

CSFROMSW 

BIT(1) 

FROM-REG IN RCD-MOVE SAVED 

494 

3 

CTECHNQS 

BITC1) 

TECHNIQUE FORCED 

494 

3 

CDDFIRST 

BIT C1> 

PROC.FIRST DDNAME CHARACTER 

494 

3 

CERRSW1 

BITCH 

ERROR IN REQUIRED PARAMETER 

494 

3 

CERRSW2 

BITC1) 

ERROR IN OPTIONAL PARAMETER 

494 

3 

CNEWPAGE 

BITC1) 

NEW PAGE HAS BEEN TAKEN 

495 

2 

C0NSW1 

PTRC8) 

MISCELLANEOUS SWITCHES 

495 

3 

CCONCASW 

BITC1) 

CONCATENATION OF DATASETS 

495 

3 

CFIRSTSW 

BITC1) 

OPEN OF FIRST DATA SET 

495 

3 

CSHORTSW 

BITC1) 

SHORT VAR RECORD FOUND 

495 

3 

CDYNSW 

BITC1) 

ONE DYNALLOC FAILED 

495 

3 

CTPDYNSW 

BITC 1) 

NO DYNNUMB FOR TAPE 

495 

3 

CALLOCND 

BITC1) 

ALL WORKFILES ALLOCATED 

495 

3 

CFIXPAGE 

BITC1) 

PROTECTED AREA FIXED 

495 

3 

CPARMODE 

BITC 1) 

PARTITION MODE SWITCH 

495 

4 

CIMS 

BITC1) 

SORT INVOKED BY IMS 

496 

2 

C0NSU2 

PTRC8) 

MISCELLANEOUS SWITCHES 

496 

4 

CVSANR1 

BITC 1) 

VSAM RELEASE 1 IN SYSTEM 

496 

4 

CNOREUSE 

BIT C13 

VSAM OUTPUT NON-REUSABLE 

496 

4 

CDYNGEN 

BIT C13 

DYNALLOC GENERIC NAMES USED 

496 

4 

CINCHAIN 

BITC 1 3 

NO CHAIN SCHED FOR SORTIN 

496 

4 

CONCHAIN 

BITC13 

NO CHAIN SCHED FOR SORTOUT 

496 

4 

CDKALLOC 

BITC 1 3 

SORTDK ALLOCATED 

496 

4 

COPENCLS 

BITC13 

OP/CL SYSOUT IN PRSS 

496 

4 

CFAKE35 

BITC1) 

L2 GET L3 SWITCH 

497 

2 

CONRECFM 

CHARC1) 


498 

2 

COPTIONS 


OPTION SWITCHES 

498 

3 

CSORTNAM 

CHARC4 ) 

PREFIX FOR DD STATEMENTS 

49C 

3 

CSRTMRGE 

CHARC1) 

SORT = C S) 1 MERGE=(M) 

49D 

3 

CSYSDUMP 

CHARC1) 

YES = SYSUDUMP OR SYSABEND 

49E 

3 

CDIAGMOD 

CHARC1) 

YES = PRINT DIAGNOSTICS 

49F 

3 

CINVOKED 

CHARC1) 

YES = DYNAMIC INVOCATION 

4A0 

3 

CCHECKPT 

CHARC1) 

YES = TAKE CHECKPOINTS 

4A2 

3 

CSEEKMOD 

CHARC1) 

YES = DO STAND-ALONE SEEKS 

4A3 

3 

CCONMODE 

CHARC1) 

Y=PEER N=NONPEER 0=5734 

4A4 

3 

CE15M0D 

CHARC1) 

YES = E15 ADDRESS GIVEN 

4A5 

3 

CE35MQD 

CHARC1) 

YES = E35 ADDRESS GIVEN 

4A6 

3 

CMODCARD 

CHARC1) 

YES = MODS STMNT PRESENT 

4A7 

3 

CEXACTSZ 

CHARC1) 

YES = EXACT FILSZ GIVEN 

4A8 

3 

CESTIMSZ 

CHARC1) 

YES = ESTIM. SIZE 1 FILSZ 

4A9 

3 

CTECHNQ 

CHARC1) 

P 1 BI 0|X|N OR DEFAULT E 

4AA 

3 

CKEYMODE 

PTRC8) 

NUMBER OF INDEXES PER TRACK 

4AB 

3 

CSYSTEM 

CHARC1) 

0=MFT/MVT S=SVS M=MVS 

4AC 

3 

CPAGESIZ 

PTRC31) 

PAGE SIZE FOR SYSTEM 

4B0 

2 

C0MMB 

PTRC31) 

EXTRACT/RESTORE CODE AREA 

4B4 

2 

COMMBEND 

PTRC31) 

END OF EXTRACT/RESTORE AREA 

4B8 

2 

CONLRECL 

FIXEDC15) 


4BA 

2 

CP0SIZE 

FIXEDC15) 

PARTITION ZERO SIZE 
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DISP 

LEVEL 

LABEL 

ATTR 

4BC 

2 

CPRTDECB!5) 

PTR(31) 

ADO 

2 

CPAGELIM 

PTR(31) 

ADA 

2 

CPAGELOC 

PTR(31) 

AD8 

2 

CPEERAGE 

FIXED(31) 

ADC 

2 

CPARCLC(3) 

PTR(16) 

AE2 

2 

2 

CPARMVCC3) 

X 

PTR(16) 
CHAR(2) 

AEA 

2 

CPRT 

CHAR(129) 

AEA 

3 

CPRTHEAD(A) 

FIXEDU5) 

AF2 

3 

A 

CPRTLINE 

X 

CHAR(121) 
FIXED(15) 

AFA 

A 

A 

CMSGLIST(29>FIXED(31) 
x CHAR(3) 

56B 

2 

CPREGION 

CHAR(l) 

56C 

2 

CPHASECG 

FIXED(31) 

570 

2 

CPHASEPG 

FIXED(31) 

57 A 

2 

CPHASERG 

FIXED(31) 

578 

2 

CPHASEEG 

FIXED(31) 

57C 

2 

CPHASEWK 

BDY(WORD) 

57C 

3 

CEXITTAB 

CHAR(16) 

57C 

A 

CDECL1 

FIXED(31) 

580 

A 

CDECL2 

FIXED(31) 

58A 

A 

CDECL3 

FIXED(31) 

588 

A 

COBUFFER 

PTR(31) 

588 

5 

CDECDED 

PTR(31) 

588 

6 

CDEVWK 

PTR(31) 

58C 

3 

CE15PARM 

CHAR(A) 

590 

3 

CE35PARM 

CHAR(12) 

59C 

2 

CPUTREC 

PTR(31) 

59C 

3 

CTIOTOUT 

PTR(31) 

5A0 

3 

C0RMSG39 

PTR(31) 

5A0 

2 

CPAGER5A 

PTR(31) 

5AA 

2 

CPBUF1 

FIXED!31) 

5A8 

2 

CPROTSIZ 

FIXED(31) 

5AC 

2 

CPRMSIZ 

FIXED!31) 

5B0 

2 

CREBUILD 

PTR(31) 

5B0 

3 

COREUSED 

FIXED(31) 

5BA 

2 

CRECSIZE 

FIXED!31) 

5B8 

2 

CRECADDR 

PTR(31) 

5B8 

3 

CSPNVSAM 

PTR(31) 

5BC 

2 

CRECAREA 

PTR(31) 

5C0 

2 

CRECCTR 

FIXED(31) 

5CA 

2 

CRECORD 

FIXED(31) 

5C8 

2 

CRECPTR 

PTR(31) 

5CC 

2 

CRECPBUF 

FIXED(31) 

5D0 

2 

CRECTBUF 

FIXED!31) 

5DA 

2 

CRBUFFRS 

FIXED!16) 

5D6 

2 

CRETCODE 

PTR(8) 

5D7 

2 

CRECTYPE 

PTR(8) 

5D7 

3 

CFIXREC 

BIT! 1) 

5D7 

3 

CVARREC 

BIT(1) 

5D7 

3 

CSPANIN 

B IT (1) 

5D8 

2 

CRESPMTM 

PTR(31) 

5DC 

2 

CRESTORE 

PTR(31) 

5E0 

2 

CRESTMP 

PTR(31) 

5EA 

2 

CRLSE 

CHAR!1) 

5E5 

2 

C0NSW3 

PTR(8) 

5E5 

3 

CB37MSG 

BIT(1) 

5E5 

3 

CWKVAMDS 

BIT(l) 

5E5 

3 

CSRTCNTL 

BIT(1) 

5E5 

3 

CABRETRN 

BIT(l) 

5E5 

3 

CMERGEIN 

BIT! 1) 

5E8 

2 

CRMERGE 

FIXED!31) 

5EC 

2 

CRPLIN 

PTR!31) 

5F0 

2 

CRPLOUT 

PTR!31) 

5FA 

2 

CRSAFREE 

PTR(31) 

5FA 

3 

CE35AREA 

PTR(31) 


COMMENT 


PRINTER OUTPUT DECB 
END PTR TO UNPROT FIXD AREA 
ADDR. OF FIXED AREAS TABLE 
MIN. NO STRINGS ON SORTWK 
PAR INDEX BIN COMP 
PAR INDEX BIN MOVE 
RESERVED xxxxxxxxxx 
(WORD 3) PRINT BUFFER 
VLR AND VLB INFORMATION 
(WORD 3) PRINTER OUTPUT 
PRINT LINE 

MSG VARIABLE INFO LIST 

REGION IS CORE LIMIT 

MAXIMUM G-VALUE - CREATION 

MAXIMUM G-VALUE - PARTTION 

MAXIMUM G-VALUE - REDUCTION 

MAXIMUM G-VALUE-ELIMINATION 

PHASE WORK AREA 

EXIT RETURN BRANCHTAB 

REC LEN1 IN DEC 

REC LEN2 IN DEC 

REC LEN3 IN DEC 

ADDR OF OUTPUT INDEX BFR 

ICEDEC - ICEDED COMM 

PTR TO DEV WORK AREA 

E15 PARAMEYER LIST 

E35 PARAMETER LIST 

ADDR. OF OUTPUT PUT ROUTINE 

PTR OUTPT DD NAME (DEF-DEG) 

CORE VALUE FOR MSG 39 (DEV) 

PTR TO END OF LAST BUFFDO 

INDEX POOL ADDR 

PROT AREA SIZE 

PERM ALLOC SIZE 

REBUILD SPANNED RECORDS 

CORE USED FOR MSG 92/93 

SIZE OF TRANSPOSED RECORD 

ADDR. OF RECORD - FOR VSAM 

VLR PAD/RESTORE AREA 
RCD COUNT FOR CURRENT TRACK 
ADDR TO RECORD KEY 
SPANNED REC PTR 
RECORDS/BUFFER 
RCD/BUF xTREE ENTRY SIZE(4) 
NUMBER OF R-PHASE BUFFERS 
RETURN CODE AREA (0|10) 
RECORD TYPE 

ON = FIXED LENGTH RECORDS 
ON = VARIABLE LENGTH RECS 
ON = VAR. SPANNED INPUT 
PERM RES CH OR TEMP RES 
ADDR. OF RESTORE ROUTINE 
TEMP RESERVE CNT 
YES FOR RELEASE OF SORTWK 
MISCELLANEOUS SWITCHES 
B37 RECOVERY MAG FLAG 3L5A 
VIO WORK DATASET PRESENT 
SORTCNTL STATEMENT PRESENT 
TO PREV SEC. ENTR OF ABENDR 
S0RTIN01 DD STMNT PRESENT 
MERGE ORDER - REDUCTION 
ADDR OF VSAM INPUT RPL 
ADDR OF VSAM OUTPUT RPL 
ADDR. OF NEXT BIN IN RSA 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

5F8 

2 

CSYSIH 

PTR(31) 

SYSIN DCB POINTER 

5FC 

2 

CSYSOUT 

PTR(31) 

SYSOUT DCB POINTER 

600 

2 

CSORTIN 

FIXEDC31) 

SORTIN DCB POINTER 

604 

2 

CSORTOUT 

FIXEDC 31) 

SORTOUT DCB POINTER 

608 

2 

CSKIPREC 

FIXEDC 31) 

NUMBER OF RECORDS TO SKIP 

609 

3 

CSKIPR24 

PTRC24) 

THREE BYTES 

600 

2 

CSCANLOC 

PTRC31) 

ADDR. OF LAST SCAN LOCATION 

60C 

3 

CMAXREC 

FIXED(31) 

MAXIMUM RECORD SIZE 

610 

2 

CSAVITTR 

PTRC.31) 

PREVIOUS INDEX BLOCK ITTR 

614 

2 

CSTRINGS 

FIXED(31) 

STRING COUNT 

618 

2 

CSELECT 

PTRC31) 

ADDR. OF TSELECT ROUTINE 

61C 

2 

CSORTWK 

PTRC31) 

PTR TO SORTWK DCB LIST 

620 

2 

CSYSOUTD 

PTR(31) 

SYSOUT - DCB 

680 

2 

CSUBSI2E 

FIXED!15) 

SUB-BIN SIZE 

682 

2 

CSUBPBAS 

FIXED!15) 

SUB-BIN/BASE-BIN 

684 

2 

CSECALL 

CHARC2) 

SECONDARY ALLOCATION SWITCH 

688 

2 

CSTAESAV 

PTRC31) 

STAE WORK AREA - 


3 

X 

PTRC8) 

SAVE ADDRESS - 

689 

3 

CSTAE524 

PTR!24) 

FOR NEXT LEVEL 

68C 

2 

CSECTRK 

FIXEDC 31) 

SEC.ALLOC. TRK COUNTER 

690 

2 

CSAVEPTR 

FIXEDC 31) 

SAVE AREA POINTER 

694 

2 

CSYSRES 

FIXEDC 31) 

SYSTEM NEEDS 

698 

2 

CTREESIZ 

FIXEDC 31 ) 

SIZE OF ALLOCATED TREE 

69C 

2 

CTREELOC 

PTRC31) 

ADDR. OF START OF TREE 

6 AO 

2 

CUTABENT 

PTRC31) 

PTR/DISPL TO UNIT TAB ENTRY 

6 AO 

3 

CBLKPTRK 

FIXEDC 31) 

BLKS/TRK LOACALLY 

6A4 

2 

CTRESHLD 

FIXEDC 31) 

FREE BYTES IN RSA 

6A8 

2 

CTMPSIZ 

FIXEDC 31) 

TEMP ALLOC SIZE 

6 AC 

2 

CTREE2 

PTRC31) 

LOOK AHEAD TREE 

6B0 

2 

CTESTKEYC3) PTR(16) 

CLC FOR TWO CONTROL WORDS 

6B8 

2 

CURRDECB 

PTRC31) 

ADDR. OF CURRENT DECB 

6BC 

2 

CURRDATE 

FIXEDC 31) 

CURRENT DATE - PACKED DEC. 

6C0 

2 

CURREC 

PTRC31) 

ADDR TO BUFFERED REC IN RSA 

6C4 

2 

CVERACC 

FIXEDC 31) 

ACCUMULATOR FOR VERIFY 

6C8 

2 

CVSAMERR 

PTRC31) ' 

ADDR OF MODULE ICEERR 

6CC 

2 

CVSAMRVE 

FIXEDC 31) 

STORAGE RESEVED FOR VSAM 

6 DO 

2 

CVMOVEL 

FIXEDC 31) 

VLR - NO OF BYTES TO MOVE 

6D4 

2 

CVREMSW 

BITC8) 

ICEVRE MISQ SWITCH 

6D4 

3 

CINC0RE 

BITC1) 

1=INC0RE SORT 

6D4 

3 

CVIM 

BITC1) 

1=BYPASS VED CALL VIM 

6D4 

3 

CE15DELT 

BITC1) 

1=E15 DELETED 

6D4 

3 

CRSAFULL 

BIT!1) 

1=RSA IS FULL 

6D4 

3 

CFRSTBIN 

BITC1) 

1=FIRST BIN ALLOC 


3 

CFIRSTSB 

BIT(l) 

1=FIRST SUB-BIN 

6D5 

2 

CWRKTYPE 

CHAR C1) 

T=TAPE D=DISK 

6D6 

2 

CWMINCON 

FIXEDC15) 

CTRL FIELD BASED MIN RECLEN 

6D8 

2 

CWTO 

BDYCWORD) 

WTO - MF=L 


3 

X 

FIXEDC15) 

TEXT LENGTH 


3 

* 

PTRC16) 

MCC FLAGS 

6 DC 

3 

CMESSAGE 

CHAR C120) 

MESSAGE AREA 


4 

X 

CHARC3) 

MESSAGE IDENTIFICATION 

6DF 

4 

CMSGNO 

CHARC3) 

MESSAGE NUMBER 

6E2 

4 

CMSGTAG 

CHAR!1) 

MESSAGE TAG 


4 

X 

CHARC1) 

MESSAGE BLANK 

6E4 

4 

CJOBNAME 

CHARC8) 

JOB NAME 

6 EC 

4 

CDOT 

CHARC1) 

DOT 

6 ED 

4 

CSTEPNAM 

CHARC8) 

STEP NAME 

6F5 

4 

CMSGBLNK 

CHARC1) 

MESSAGE BLANK 

6F6 

4 

CMSGINFO 

CHAR C 94) 

MESSAGE TEXT 


3 

X 

PTR!16) 

DESCRIPTOR CODES 


3 

X 

PTRC16) 

ROUTING CODES 

758 

2 

CWORKQ 

PTRC31) 

ADDRESS OF WORK AREA QUEUE 

75C 

2 

CWBPOOL 

FIXEDC 31) 

WB-POOL ADDRESS 

760 

2 

CWBPOOLL 

FIXEDC15) 

WRITEBACK POOL SIZE 

762 

2 

CWBPOOLC 

FIXEDC15) 

CURRENT POOL SIZE 
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DISP 

LEVEL 

LABEL 

ATTR 

COMMENT 

764 

2 

CWBPOOLR 

FIXEDC15) 

OFFSET TO RESERVE BLOCK 

766 

2 

CWMINREC 

FIXEDC15) 

MIN EXTRACT IN NON-PEER 

768 

2 

CEXIT25 

BDY(WORD) 

EXIT25 

768 

3 

CE25NAME 

CHARC8) 

EXIT E25 NAME 

770 

3 

CE25LNG 

FIXEDC 31) 

EXIT E25 LENGTH 

770 

4 

CE25CALL 

PTRC31) 

AND ITS CALL ADDRESS 

774 

2 

CSRTMODS 

PTRC31) 

SORTMODS DCB POINTER 

774 

3 

C5YSLIN 

PTRC31) 

SY5LIN DCB POINTER 

778 

2 

CLINKREQ 

CHAR(l) 

FLAGS LINKEDITING REQUEST 

779 

2 

CLODCNT1 

CHAR(l) 

LOAD COUNT PHASE 1 

77 A 

2 

CL0DCNT2 

CHARC1) 

LOAD COUNT PHASE 2 

77B 

2 

CLODCNT3 

CHARC1) 

LOAD COUNT PHASE 3 

77C 

2 

CINDEX1 

PTRC31) 

BUFFER POINTERS 

780 

2 

CINDEXH1 

PTRC31) 


784 

2 

CDECAREB 

PTRC31) 

USED IN ICELINK 

788 

2 

CTABPTR 

PTRC31) 

POINTER IN SCANTAB 

78C 

2 

CEXITLOA 

PTRC31) 

EXIT LOAD ROUTINE ADDRESS 

790 

2 

CEXITDEL 

PTRC31) 

EXIT DELETE ROUTINE ADDR. 

794 

2 

CEQE25 

PTRC31) 

PICK UP EQUALS FIELD 

794 

3 

CEQE250P 

CHARC2) 

OP CODE ICM 

798 

2 

CSTWNAME 

CHARC12) 

FOR STOW MACRO 

7A4 

2 

COUNTERY 

FIXEDC 31) 

RECS DELETED BY E25 

7A8 

2 

CLISTMAD 

CHAR C1) 

TEMP SAVE FOR CLISTMOD 

7A9 

2 

CPHASLNK 

CHARC1) 

TO REMEMBER THAT WE LINK 

7AA 

2 

CEXCPIN 

CHARC1) 

EXCP CAN BE USED FOR SORTIN 

7AB 

2 

CEXCPOUT 

CHARC1) 

EXCP -//- SORTOUT 

7AC 

2 

CBUGADDR 

FIXEDC 31) 

ICEBUG AREA ADDRESSES 

7B0 

2 

CMODDCB 

FIXEDC 31) 

MODSLIB DCB ADDRESS 

7B4 

2 

CSYSLMOD 

FIXEDC 31) 

SYSLMOD DCB ADDRESS 

7B8 

2 

CZONE61 

CHARC32) 

INTERM. STOR. F. ZD W. E61 

7D8 

2 

COBSEXIN 

PTRC31) 

ADDRESS OF SORTIN OPEN EXIT 

7 DC 

2 

COBSEXUT 

PTRC31) 

ADDRESS OF SORTOUT -//- 

7 E0 

2 

CSTOPIN 

CHARC1) 

CANT USE EXCP FOR SORTIN 

7E1 

2 

CSTOPOUT 

CHARC1) 

CANT USE EXCP FOR SORTOUT 

7E2 

2 

CDISPMOD 

CHARC1) 

DISP IS MOD FOR SORTOUT 

7E3 

2 

CMULTVOL 

CHAR C1) 

MULTIVOLUME DATA SET FLAG 

7E4 

2 

COBSEXIT 

PTRC31) 

EXCP OPEN EXIT ADDRESS 

7E8 

2 

COBSBLOK 

PTRC31) 

ADDRESS OF EXCP DATA CODE 

7EC 

2 

CBLDLNAM 

CHARC8) 

MEMBER NAME FOR SORTIN 

7F4 

2 

CSAVER14 

FIXEDC 31) 

SAVE AREA IN ALL PHASES 

7F8 

2 

CIHCONCA 

CHARC1) 

CONCATENATED SORTIN FLAG 

7F9 

2 

COPENFL 

CHARC1) 

PERFORM OPEN IN ICEOBS 

7FA 

2 

CMSGACNT 

FIXEDC15) 

COUNT OF ACTION MESSAGES 

7 FC 

2 

CLENSTAT 

PTRC31) 

SMF WORK AREA PTR 

800 

2 

CXTRSTAT 

• PTRC31) 

SMF STATISTICS RTN PTR 

OR EXTRACT RTN PTR 

804 

2 

CFILBYTE 

FIXEDC 31) 

FILE SIZE ACCUM (BYTES) 

808 

2 

CTOTTII1E 

FIXEDC 3D 

CPU TIME AREA FOR SMF 

80C 

2 

CAVGRCDL 

FIXEDC 31) 

AVGERAGE RECORD LENGTH 

810 

2 

CTREEBAS 

FIXEDC 31) 

TREE BASECODE ADDRESS 


2 

CPATCH 

FIXEDC 31) 

RESERVED 

828 

2 

CTRACE 

CHARC128) 

TRACE TABLE 
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Control Phase Information Area (CPI), Conventional Techniques 


The program's Control Phase Information Area is set up by ICERCO and 
ICERCM. It is used for the communication of parameters that are needed 
by the general assignment routines. It is expanded into the PPI 
(Phase-to-Phase Information Area) by ICERC1 in the Optimization Phase. 


DISPLACEMENT FIELD DESCRIPTION 

DEC (HEX) SIZE NAME MEANING/USE 


0 

(0) 

72 

ICERC5 

72 

(48) 

72 


72 

(48) 

2 

CPINUMCF 

74 

(4A) 

72 

CPIPCFxx 


3 




2 

1 


146 

(92) 

8 

CPISW1 

154 

(9A) 

4 

CPILAB09 


(Byte 1) 
(Byte 2) 


(Bytes 3-4) 


158 

(9E) 

2 

CPINWKU 

160 

(A0) 

2 

CPIP IASZ 

162 

(A2) 

2 

CPIIPBLK 

164 

(A4) 

2 

CPIFFF 

166 

(A6) 

2 

CPIPBUFF 

168 

(A8) 

2 

CPIP2ASZ 

170 

(AA) 

2 

CPIP3ASZ 

172 

(AC) 

2 

CPIOPBLK 

174 

(AE) 

2 

CPIBUF23 

176 

(B0) 

2 

CPISRTBL 

178 

(B2) 

2 

CPIRCDL1 

180 

(B4) 

2 

CPIRCDL2 

182 

(B6) 

2 

CPIRCDL3 

184 

(B8) 

2 

CPIRCDL4 

186 

(BA) 

2 

CPIRCDL5 

188 

(BC) 

2 

CPILAB03 

190 

(BE) 

2 

CPILAB07 

192 

(CO) 

2 

CPIPGCSZ 

194 

(C2) 

2 

CPIBINSZ 

196 

(C4) 

3 

CPISKPRD 

199 

(C7) 

3 

CPIATP IE 

202 

(CA) 

3 

CPIMODEX 

205 

(CD) 

3 

CPIATP3E 

208 

P0) 

3 

CPITAVLC 

211 

(D3) 

3 

CPIFILSZ 

214 

(D6) 

3 

CPISRTG 

217 

(D9) 

3 

CPISIRG 

220 

(DC) 

3 

CPIP1GC 

220 

(DC) 

3 

CPIP1RSZ 

223 

(DF) 

3 

CPIP2GC 

223 

(DF) 

3 

CPIP2RSZ 

226 

(E2) 

3 

CPIP3GC 

226 

(E2) 

3 

CPIP3RSZ 

229 

(E5) 

1 

CPIBUF1 

230 

(E6) 

1 

CPIMRGMX 


Register area 

Control Field Information 

No of control fields 

12 entries in the form: 

- Position 

- Length 

- Format + sequence 
Switch of 64 Bits 

(See PPISW1 for details) 

Output buffers: 

No of ph2 output buffers 
No of ph3 output buffers 
Size of ph3 output buffers 
No of work units 
Phi assignment size 
Input blocking 
Displacement of F field 
(used by extract routine) 
Displacement of packing buffer 
Size of ph2 assignment modules 
Size of ph3 assignment modules 
Output blocking 
No of buffers (ph2,3) 

B (blocking used on work areas) 
1, from RECORD stmt (LENGTH) 

l a from RECORD stmt (LENGTH) 

1 3 from RECORD stmt (LENGTH) 

14 from RECORD stmt (LENGTH) 

l s from RECORD stmt (LENGTH) 

Size of phi input buffers 
Output buffer information 

Size of area used by extract rtn 
Bin size 

Count of skipped records 
Addr of invoking pgm's phi exit 
Exits Activated 
(see first 3 bytes of PPIMODEX 
for details) 

Addr of invoking pgm's ph3 exit 
Size of available core r phi 
Value of FILSZ/SIZE parameter 
G (Capacity of RSA, in records) 
Size of interblock gap (tape wk) 
Size of phi work area 
Phi running modules size 
Size of ph2 work area 
Ph2 running modules size 
Size of ph3 work area 
Ph3 running modules size 
No of phi buffers 
Maximum merge order 
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DISPLACEMENT FIELD DESCRIPTION 

DEC (HEX) SIZE NAME MEANING/USE 


231 

(E7) 

5 1 

CP1MRGAL 

232 

(E8) 

3 

xxxx xxxx 

xxxx xxxx 

X... .... 

.1.. .... 
..1. .... 
...1 .... 
.... 1... 
.... .1.. 
.... ..1. 
.... ...1 

CPILINK 
(Byte 1) 
(Byte 2) 
(Byte 3) 

235 

(EB) 

3 

CPIADDCF 

238 

(EE) 

8 

CPISORCE 

246 

(F6) 

4 

CPIDDSRT 

250 

(FA) 

2 

CPIDCBIN 

252 

(PC) 

2 

CPIDCBOU 

254 

(FE) 

4 

CPIXCAP 

258 

(102) 

16 

CPIDEV 

274 

(112) 

3 

CPIAUENT 

277 

(115) 

1 

CPISUENT 

278 

(116) 

8 

CPIMSGDD 

286 

(11E) 

1 

CPIRECFM 

287 

(1 IF) 

8 

CPIJOBNM 

295 

(127) 

8 

CPISTPNM 

303 

(12F) 

1 

1... .... 

.1.. .... 

..1. .... 

...1 .... 

.... 1... 

.... .1.. 

.... ..1. 

.... ...1 

CPISW2 

CPIFSEON 

306 

(130) 

2 

CPIMXCOL 

308 

(132) 

1 

CPIDEVCD 

309 

(133) 

256 

CPIAQTAB 


Alternate merge order 
Link Edit Info for exit rtns 
Exits in order as for PPIMODEX: 
1=Routine was link edited, 

0=Not edited (via the program) 

Eli routine edited separately 
E21 routine edited separately 
E31 routine edited separately 
Linkage editing was carried out 
VSAM output not reusable 
Linkage edit error 
VSAM release 1 in system 
When more than 12 ctl fields: 
addr of additional information 
DDname of user mod library 
4 chars to replace SORT in DDnames 
(fr parara list when pgm invoked) 
Size Of SORTIN DCB 
Size of SORTOUT DCB 
OSCL:RMAX (max no of bytes/reel) 
Otherwise: Capacity of interm, 
storage (in records) 

Device inf: words 2-5 fr DEVTYPE 
macro (used by ICERCI) 

Addr of user exit name table 
Size of user exit name table 
Message DDname if not SYSOUT 
User record format for ph3 
Jobname 
Stepname 

Switch of 8 Bits 

FILSZ given with exact value 

Exec sort with ABEND option 

AQ control fields present 

Preserve order of equals 

VSAM input 

KSDS VSAM output 

ESDS VSAM output 

SIZE (MAX) used 

Rightmost col included in any 
control field 

Device code for unit with RPS 
Translate table for use with 
AQ control fields 
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Phase-to-Phase Information Area (PPI), Conventional Techniques 


The Phase-to-Phase information area (PPI) is a communication area for 
all modules of the conventional sort/merge program. It is created 
during Phase 0 and resides in main storage throughout execution. It is 
not executable, and has the CSECT name ICERCA. 

The program uses register 13 as the base register for the PPI. 

Reference to any field within the area can be made by adding the 
appropriate displacement to the contents of register 13. The 
displacement for each field within the PPI appears in decimal and 
hexadecimal form in the description which follows Figure 15. 


Abbreviations 

Mult means a multiple compare routine is used to compare records; 

No mult means it is not; 

Extract means an extract routine is used to compare records. 

Fix means records are fixed length; 

Var means records are variable length. 
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oo 

08 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 

80 

88 

90 

98 

AO 

A8 

BO 

B8 

CO 

C8 

DO 

D8 

EO 

E8 

FO 

F8 

100 

108 

110 

118 

120 

128 

130 

138 

140 

148 

150 

158 

160 

168 

170 

178 

180 

188 

190 

198 

1A0 



8 bytes 



_4] 

X'OO' t CH'SMI' 

1 

SVARE 

1 

P1GC 

P1ASZ 

SKPRD 

ATP IE 

IPBLK 

BUF1 

PGCSZ 

FFF 

PBUFF 


1 NUMCF 1 PCF01 

MCF01 ! FCF01 

! PCF02 

MCF02 

FCF02 |PCF03(3 bytes) 

(PCF03) 

MCF03 

FCF03 

PCF04 

MCF04 
(2 bvtes) 

(MCF04) 

FCF04 I PCF05 

MCF05 

FCF05 

! PCF06 

MCF06 

FCF06 1 PCF07 

3 bytes) 

(PCF07) 

MCF07 

FCF07 

PCF08 

MCF08 
(2 bytes) 

(MCF08) 

FCF08 1 PCF09 

MCF09 

FCF09 

1 PCF10 

MCF10 

FCF10 1 PCF11 (3 bytes)H 

(PCF11) 

MCF11 

FCF11 

PCF12 

MCF12 
(2 bvtes) 

(MCF12) 

FCF12 | 

4 

LAB01 

(phi, 2 & 3 of 

BALN disk sort) 

_ 1 _ 


TPPT (for tape sort) 

tWork space ^ 


for tape sorts 
(all phases) 


iDIRAD (phi, 2 & 3 of BALN disk sort) 


t 

STJ 

(Pi 

k t 

ODOM TPTBL 

(phi 4 2 Of (Phi 

OSCL sort) POLY 

I tape 

« 1 

11, 2 t 3 of 4 

4 2 of 
or BALN 
sort) 

0R? 

BAI 

SOI 

:x of 
jN disk 
-t) 

t 

i 

t 

I ~ 


PDWA 
(work 
area, 
ph2& 3) 


Save \ 
area, 
ph2 & 3 
(except 
BALN 
disk) 


Control 

field 

info. 

(up 

to RCZ) 


v 

J 


DSKED 

(for 

CRCX 

S BALK 

disk 

sort) 


Figure 15. 
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1A8 
1B0 
1B8 
ICO 
1C8 
IDO 
ID 8 
1E0 
IE 8 
1F0 
1F8 
200 
208 
210 
218 
220 
228 

PPIENDAR 

230 

PPISW1 

238 

PPIMODEX | SW2 

PPILINK 

240 

PPICOUNT 

PPIDELCT 

248 

PPINSCT 

PPIRCDCT 

250 

_ 




258 

PPISEQCT 

PPIFILSZ 

260 

PPIBINSZ 

PPISIRG 

268 

PPIXCAP 

PPISTRG 

270 

SRTBL 

OP BLK 

BUF23k\\Xl RECFMKX^ 

278 

PPIOPFMP 

280 

PPIDEPHO 

288 

RCDL1 

RCDL2 

RCDL3 

RCDL4 

290 

RCDL5 

MRGMX 

MRGAL 

MRGOP 

298 

DD0L1 

AXERT | 

2A0 

USER 

LEXFD 

LEXFF 1 

2A8 

NDSKA 

BPTRK 

LAB 03 

2B0 

LAB 07 

DOUO or LAB09 

2B8 

P2GC 

P3GC 

2C0 

P3ASZ 

ATP3E 

2C8 

TAVLC 

TREND 

2D0 

SPGN1 

LAB 02 

2D8 

LAB 04 

LAB 05 

2E0 

LAB06“ 

DOOBA or LAB08 

2E8 





2F0 


BDSVA 


2F8 

STDCB 

SBLCT 

300 

STIOB 

UNTCT 

308 

LAB10 

GETMN 

310 

GETSZ 

SORCE 

318 

(cont) 

SLIB 

320 

RCV 

ADSSC 

328 

ALG 

330 

DEB 

338 

NET 

340 

BLK 

348 

WRT 

350 

VMV 


Figure 15. 


(2 of 3) Map of PPI 
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RD 


DEB 2 


NETM 


BLK2 


NT 


CONV 


F 


RMA 


RMC or RMB 


AMA 


AMC or AMB 


OPEN 


Xll 


X15 or E32 


X35 or X25 


X17 


X18 


or X2 


X19 


X39 or X29 


X61 


X16 


ADDCF 


IVWXVVWX^I 


DDSRT 


CHKAD 


DCBIN 


CPTRK 


MXCOL 


DCBOU 


ARGC 


TPCYL 


DPTRK 


NETAR 




FTTAB 


imsai 


JOBNM 


STPNM 


OPBAD 


MOVEQ 


VSMSG 


RPLDP 


VSMSL 



Figure 15. (3 of 3) Map of FPI 
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DISPLACEMENT 

DEC (HEX) 

SIZE 

FIELD 

NAME 

DESCRIPTION: CONTENTS, 
MEANING/OSE 

0 

(0) 

1 


X'OO* 

1 

(1) 

3 

PPISM 

CH'SMl* (program identifier) 

72 

(48) 

256 

PPIWKARE 

Program work area (sort) 

72 

(48) 

64 

PPIPDWA 

program work area (merge) 

72 

(48) 

4 

PPIP1GC 

Size of Phi work area 

76 

(4C) 

4 

PPIP1ASZ 

Phi assignment size 

80 

(50) 

4 

PPISKPRD 

Count of skipped records 

84 

(54) 

4 

PPIATP1E 

Address of invoking program's 
Phi exit 

88 

(58) 

4 

PPIIPBLK 

Input blocking 

92 

(5C) 

4 

PPIB0F1 

No of Phi buffers 

96 

(60) 

4 

PPIPGCSZ 

Size of area used by extract 
routine 

100 

(64) 

4 

PPIFFF 

Displacement of F field 
(used by extract routine) 

104 

(68) 

4 

PPIPBUFF 

Displacement of packing buffer 

108 

(6C) 

4 


Reserved 

112 

(70) 

72 


Control Field Information 

112 

(70) 

2 

PPINUMCF 

No of control fields 

114 

(72) 

3 

PPIPCF01 

Control field 1: - Position 

117 

(75) 

2 

PPIMCF01 

- Length 

119 

(77) 

1 

PPIFCF01 

- Format * sequence 

120 

(78) 

3 

PPIPCF02 

Control field 2: - Position 

123 

(7B) 

2 

PPIMCF02 

- Length 

125 

(7D) 

1 

PPIFCF02 

- Format * sequence 

126 

(7E) 

3 

PPIPCF03 

Control field 3: - Position 

129 

(81) 

2 

PPIMCF03 

- Length 

131 

(83) 

1 

PPIFCF03 

- Format + sequence 

132 

(84) 

3 

PPIPCF04 

Control field 4: - Position 

135 

(87) 

2 

PPIMCF04 

- Length 

136 

(88) 

64 

PPIPSVA 

Merge network prime area 

137 

(89) 

1 

PPIFCF04 

- Format * sequence 

138 

(8A) 

3 

PPIPCF05 

Control field 5: - Position 

141 

(8D) 

2 

PPIMCF05 

- Length 

143 

(8F) 

1 

PPIFCF0 5 

- Format * sequence 

144 

(90) 

3 

PPIPCF06 

Control field 6: - Position 

147 

(93) 

2 

PPIMCF06 

- Length 

149 

(95) 

1 

PPIFCF06 

- Format * sequence 

150 

(96) 

3 

PPIPCF07 

Control field 7: - Position 

152 

(98) 

48 

PPIDSKED 

Used for up to 17 disk 


addresses. Phi,2,3. Format: 
Assignment mod: ABCC 
(A=channel address 
B=unit address 
CC=no of tracks) 

Running mod: M BB CC HH R 


153 

(99) 

2 

PPIMCF07 

Control field 7: length 

155 

(9B) 

1 

PPIFCF07 

- Format * sequence 

156 

(9C) 

3 

PPIPCF08 

Control field 8: - Position 

159 

(9F) 

2 

PPIMCF08 

- Length 

161 

(Al) 

1 

PPIFCF08 

- Format ♦ sequence 

162 

(A2) 

3 

PPIPCF09 

Control field 9: - Position 

165 

(A5) 

2 

PPIMCF09 

- Length 

167 

(A7) 

1 

PPIFCF09 

- Format * sequence 

168 

(A8) 

3 

PPIPCF10 

Control field 10: - Position 

171 

(AB) 

2 

PPIMCF10 

- Length 

173 

(AD) 

1 

PPIFCF10 

- Format * sequence 

174 

(AE) 

3 

PPIPCF11 

Control field 11: - Position 

177 

(B1) 

2 

PPIMCF11 

- Length 

179 

(83) 

1 

PPIFCF11 

- Format ♦ sequence 
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DISPLACEMENT 


FIELD 

DESCRIPTION: CONTENTS, 

DEC 

(HEX) 

SIZE 

NAME 

meaning/use 

180 

(B4) 

3 

PPIPCF12 

Control field 12: - Position 

183 

(B7) 

2 

PPIMCF12 

- Length 

185 

(B9) 

1 

PPIFCF12 

- Format ♦ sequence 

186 

(BA) 

14 


Reserved 

200 

(C8) 

64 

PPILABO1 

General work area 





(used mainly by read/write) 

244 

(F4) 

4 

PPITPPT 

Tape table pointer 

248 

(F8) 

136 

PPITPTBL 

Tape Table 

Two-byte entry for each unit: 



1... 0000 

(Byte T) 

Input (0=output) 



.1.. 0000 


Open routine should open unit 



..1. 0000 


OSCL: unit contains full reel 



...1 0000 


OSCL: descending sequence 
(set at EOF or RMAX) 



xxxx xxxx 

(Byte 2) 

DCB increment 

280 

(118) 

8 

PPIDIRAD 

Disk directory address 

288 

(120) 

64 

PPIODOM 

OSCL: odometer table 

Disk starting addresses 

288 

(120) 

136 

PPISTAR 

- one entry for each 
of three to 17 extents 

424 

(1A8) 

32 

PPIENDAR 

BALN (disk) & CRCX (Ph0,1,2) : 
end addr reset from PPIDSXED 

552 

(228) 

8 


CRCX (Ph3) : disk start addr 
(for read priming) 

560 

(230) 

8 

PPISW1 

Switch of 64 Bits 



1 • • • • • • • 

(Byte t) 

Fix 



• 1 • • • • • • 


Var 



• « 1 « • • • • 


No mult. 



• ••1 • • • • 


Mult. 



• • • • 1 • • • 


BALN (tape or disk) 



• • • • • 1 • • 


POLY 



• • « • • • 1 • 


OSCL 



• • • • • • « X 


Reserved 



X *•• •••« 

(Byte 2) 

Reserved 



# 1 • • • • • • 


Tape work areas 



• • 1 ■ • » • • 


BALN (disk) 



• ••1 •• • ■ 


No data chaining 



• • • • 1 • • • 


Data chaining, input 



• • • • • 1 • 


Data chaining, output 



• • • • • • 1 • 


No exits to be used 



• • • • • • • 1 


Exits to be used 



1 • • • • • • • 

(Byte 3) 

No records over 256 bytes 



• 1 • • • • • • 


Records over 256 bytes 



• • 1 • • • « • 


SKIPREC option used 



• ••1 •• • • 


Phi in progress or complete 



• ••• 1 • • • 


Ph2 in progress or complete 



• • • • • 1 • • 


Ph3 (sort) in prog or compl 



• • • • • • 1 • 


Ph3 (merge) in prog or compl 



• • • • « • • 1 


Checkpoints to be taken 



^ • • • • • 

(Byte 4) 

Mult. 



• 1 • • « • • • 


Extract 



• • 1 • « • • • 


SORTOUT in descending order 
(O^scending) 



• ••1 • • • • 


Order in Phi (or merge input) 
is descending (0 = ascending) 
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DISPLACEMENT FIELD DESCRIPTION: CONTENTS, 

DEC (HEX) SIZE NAME MEANING/USE 


>. . 1 * ■ ■ 



1. (Byte 5) 

. 1 • . • • • • 

• . 1 • tm • . . 

. . . 1 .... 


1. 


. 1 . 


..1 



(Byte 6) 


...x x... 


1. 
.1 
.. 1 


1 .. 

. 1 . 


(Byte 7) 


(Byte 8) 


568 (238) 3 

1 . 

, 1 .. .... 

. 1 . ... 

.1 _ 

.. 1 -. 
.... . 1 .. 
.... .. 1 < 


PPIMODEX 


Descending order for merge 
pass (O-ascending) 

SMI invoked (0=executed) 

FILSZ or SIZE given 
Merge-only: input present 
OSCL: QSAM has detected EOF 
*E*-type ctl fields present 
SORT statement present 
MERGE statement present 
RECORD statement present 
(or, from ICERCI onwards, disk 
work devices with RPS) 

MODS statement present 
RECORD stmt absent or wrong 
Buffers doubleword aligned 
Buffers fullword aligned 
Read error 
Write error 

BALN (tape) : odd-numbered pass 
(0=even) 

Channels available: 

00 - one multiplexor 

01 - one multiplexor and/or 

one selector 

10 - one multiplexor and/or 

several selector 

Input unit used as work unit 

Tape switch or alternative 

channel available 

More than 1 channel available 

Deblock backward 

Read forward 

Close with rewind 

Block forward 

Read forward later 

Reserved 

CRCX 

DIAG option being used 

OSCL: user EOF 

OSCL: RMAX reached 

OSCL: user insert in process 

Some or all tapes are 7-track 

CRCX: merge pass to follow 

Sort called by IMS 

Up to ICERCN: max. no. of 

control fields present 

From ICERCN: BALN 

User rtn has given 

EROPT=skip/accept 

Exits Activated 

Ell 

E15 or E32 

E16 

E17 

E18 

E21 

E25 

E27 
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DISPLACEMENT 


FIELD 

DESCRIPTION: CONTENTS, 

DEC 

(HEX) 

SIZE 

NAME 

MEANING/USE 



1 • • « • • • • 

(Byte 2) 

E28 



• 1 • • • • • • 


E31 



• • 1 • * m 9 m 


E35 



• • • 1 • » • • 


E37 



• • • • 1 • • • 


E38 



• • • • • 1 • • 


E61 



• • • • • • 1 • 


E19 



. 1 


E29 



1 . 

(Byte 3) 

E39 



.XXX X... 

Reserved 



• ••• • 1 • • 


RECFM=FB in SYSOUT DCB 



• • • • • • 1 • 


Input is spanned records 



. 1 


Output is spanned records 

Switch of 8 Bits 

571 

(23B) 

1 

PPISW2 



1 • • • • m • • 

PPIFSEON 

FILSZ given with exact value 



• 1 • • 


Exec sort with ABEND option 



• •1* • • • • 


AQ control fields present 



• • • 1 • • • • 


Preserve order of equals 



• ■ • • 1 • • • 


VSAM input 



• • • • • 1 • • 


KSDS VSAM output 



• m m m # • 1 • 


ESDS VSAM output 



• • • • 


SIZE(MAX) used 

572 

(23C) 

4 

PPILINK 

Link Edit Information 
for exit rtns (set by RCH) 



xxxx xxxx 

xxxx xxxx 

X. . . .... 

(Byte 1) 

(Byte 2) 

(Byte 3) 

Exits (same order as PPIMODEX) : 
1=Routine link edited, 

0=Not edited (via the program) 
Ell routine edited separately 



• 1 * • • • • • 



• • 1 • • • • • 


E21 routine edited separately 



• • • 1 • • • * 


E31 routine edited separately 



• • • m 1 • • • 


Linkage editing carried out 



• • • • • 1 • • 


VSAM output not reusable 



• • • • • • 1 • 


Linkage edit error 



• • • • • • • 1 


VSAM release 1 in system 



XXXX xxxx 

(Byte 4) 

Reserved 

576 

(240) 

16 

PPIDEV 

Device inf: words 2-5 fr DEVTYPE 
macro used by ICERCI 

576 

(240) 

4 

PPICOUNT 

Count of records: 

Phi - deblocked from input 

Ph2 - written to work units 

Ph3 - placed on SORTOUT 

580 

(244) 

4 

PPIDELCT 

Count of records deleted 

584 

(248) 

4 

PPIINSCT 

Count of records inserted 

588 

(24C) 

4 

PPIRCDCT 

Count of records entering ph. 

592 

(250) 

12 

PPISEQCT 

BALN (disk) : cotint of strings 
per work area (halfword/area) 

BALN (tape): count of strings- 




(Bytes 1-4) 

- entering phase 




(Bytes 5-6) 

- written out 

604 

(25C) 

4 

PPIFILSZ 

Value of FILSZ or SIZE param. 

608 

(260) 

4 

PPIBINSZ 

Bin size 

612 

(264) 

4 

PPISIRG 

Si ze of interblock gap (tapewk) 

612 

(264) 

4 

PPISRALG 

Addr of sector conversion rtn 
(RPS) 

616 

(268) 

4 

PPIXCAP 

OSCL: RMAX (max no. bytes/reel) 
Otherwise: Cap. of interm. 





storage, in records 

620 

(26C) 

4 

PPISRTG 

G (Cap. of RSA, in records) 

624 

(270) 

2 

PPISRTBL 

B (blocking used on wk areas) 

626 

(272) 

2 

PPIOPBLK 

Output blocking 
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DISPLACEMENT 


FIELD 

DESCRIPTION: CONTENTS, 

DEC 

(HEX) 

SIZE 

NAME 

MEANING/USE 

628 

(274) 

2 

PPIBUF23 

No of buffers (Ph2,3) 

630 

(276) 

1 

PPIRECFM 

User record format for Ph3 

631 

(277) 

1 


Reserved 

632 

(278) 

8 

PPIOPFMP 

Output unit for Ph3 

640 

(280) 

8 

PPIDEPHO 

Output unit address 

648 

(288) 

2 

PPIRCDL1 

1, from RECORD stmt (LENGTH) 

650 

(28A) 

2 

PPIRCDL2 

l a from RECORD Stmt (LENGTH) 

652 

(28C) 

2 

PPIRCDL3 

1 3 from RECORD Stmt (LENGTH) 

654 

(28E) 

2 

PPIRCDL4 

1“ from RECORD stmt (LENGTH) 

656 

(290) 

2 

PPIRCDL5 

I s from’RECORD Stmt (LENGTH) 

658 

(292) 

2 

PPIMRGMX 

Maximum merge order 

660 

(294) 

2 

PPIMRGAL 

BALN 6 POLY: alternate merge 
order 

662 

(296) 

2 

PPIMRGOP 

Disk sort: optimum merge order 

664 

(298) 

4 

PPIDD0L1 

Ph2,3: length 6 offset of 
control field 1 

668 

(29C) 

4 

PPIAXERT 

Addr of mult, or extract rtn 

672 

(300) 

4 

PPIUSER 

User communication area 

676 

(2A4) 

2 

PPILEXFD 

Length of extracted fields 

678 

(2A5) 

2 

PPILEXFF 

PPILEXFD rounded up to fullwd 

680 

(2A8) 

2 

PPINDSKA 

No of disk work areas 

682 

(2AA) 

2 

PPIBPTRK 

Blocks/track for disk wk areas 

684 

(2 AC) 

4 

PPILAB03 

Input buffer information: 




(Byte 1) 

No of buffers 




(Bytes 2-4) 

Size of buffers 

688 

(2B0) 

4 

PPILAB07 

Output buffer information: 




(Byte 1) 

No of buffers 




(Bytes 2-4) 

Size of buffers 

692 

(2B4) 

4 

PPIDOUO 

X'04*=suppress sequence check 
(passed by user from E35) 

692 

(2B4) 

4 

PPILAB09 

Used to alloc, output buffers: 




(Byte 1) 

No of Ph2 output buffers 




(Byte 2) 

No of Ph3 output buffers 




(Bytes 3-4) 

Size of Ph3 output buffers 

696 

(2B8) 

4 

PPIP2GC 

Size of Ph2 work area 

700 

(2BC) 

4 

PPIP3GC 

Size of Ph3 work area 

704 

(2C0) 

4 

PPIP3ASZ 

Message option 

708 

(2C4) 

4 

PPIATP3E 

Addr of invoking pgm's Ph3 rtn 

712 

(2C8) 

4 

PPITAVLC 

Size of available core. Phi 

716 

(2CC) 

4 

PPITREND 

Ending address of tree 

720 

(2 DO) 

4 

PPISPGN1 

Address of next byte available 
in phase work area 

724 

(2D4) 

4 

PPILAB02 

Address of input buffer table 
OSCL: address of Phi input 
buffer table 

728 

(2D8) 

4 

PPILAB04 

Address of output buffer 1 

732 

(2 DC) 

4 

PPILAB05 

Address of output buffer 2 

736 

(2E0) 

4 

PPILAB06 

Address of control buffer - 
Phi: input buffer pool 

Merge-only Ph3: out.buff, pool 

740 

(2E4) 

4 

PPIDOOBA 

Addr of record for Ph3 
sequence check 

740 

(2E4) 

4 

PPILAB08 

RSA Table information: 




(Byte 1) 

No of entries 




(Bytes 2-4) 

Address of table 

744 

(2E8) 

16 

PPIBDSVA 

Block/deblock area: 




(Byte 1) 

No of work units 




(Bytes 2-4) 

Addr of inp.buff. table, Ph2£3 




(Bytes 5-8) 

Fix: addr of Phi move list 

Var: addr of next avail, bin 
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DISPLACEMENT 


FIELD 

DESCRIPTIONS CONTENTS, 

DEC 

(HEX) 

SIZE 

NAME 

MEANING/USE 




(Bytes 9-12) 

Fix: addr of Ph263 move list 
Var: no of available bins 




(Bytes 13-16) 

Var: entry to Phi move rtn 

760 

(2F8) 

4 

PPISTDCB 

Address of DCB table 

764 

(2FC) 

4 

PPISBLCT 

Address of block count table 

768 

(300) 

4 

PPISTIOB 

Address of IOB table 

772 

(304) 

4 

PPIUNTCT 

OSCL: addr of unit count table 

776 

(308) 

4 

PPILAB10 

OSCL, Ph2: addr of input buffer 
table 

780 

(30C) 

4 

PPIGETMN 

Addr of GETMAIN table of addr. 

784 

(310) 

4 

PPIGETSZ 

Addr of GETMAIN table of sizes 

788 

(314) 

8 

PPISORCE 

Up to RCZ: DDname of user mod 
library 

RCZ: DCB addr of SYSLMOD user 






user lib (bytes 1-4) 

796 

(31C) 

4 

PPISLIB 

DCB address of sort library 

800 

(320) 

4 

PPIRCV 

Reserved 

804 

(324) 

4 

PPIADSSC 

Return address to ICERCV 

808 

(328) 

240 


Module Interface List 

808 

(328) 

8 

PPIALG 

Phi,2: Algorithm 

816 

(330) 

8 

PPIDEB 

Phi,3: Deblock 

824 

(338) 

8 

PPINET 

Phi,3: Network 

832 

(340) 

8 

PPIBLK 

Phi,3: Block 

840 

(348) 

8 

PPIWRT 

Phi,2: Write 

848 

(350) 

8 

PPIVMV 

Phi: Move (var) 

856 

(358) 

8 

PPIRD 

Ph2,3: Read 

864 

(360) 

8 

PPIDEB2 

Ph2: Deblock (prime’ rtn) 

872 

(368) 

8 

PPINETM 

Ph2: Network 

880 

(370) 

8 

PPIBLK2 

Ph2: Block/deblock 

888 

(378) 

8 

PPIINT 

OSCL: Initialize sort and tree 

896 

(380) 

8 

PPICONV 

Convert hex to char for msgs 

904 

(388) 

8 

PPIEOF 

Phi,3 fnerge-only) : EODAD for 
QSAM 

912 

(390) 

8 

PPIRMA 

Messages, Phi running modules 

920 

(398) 

8 

PPIRMB 

Messages, Ph2 running modules 

920 

(398) 

8 

PPIRMC 

Messages, Ph3 running modules 

928 

(3A0) 

8 

PPIAMA 

Messages, Phi assignmt modules 

936 

(3A8) 

8 

PPIAMB 

Messages, Ph2 assignmt modules 

936 

(3A8) 

8 

PPIAMC 

Messages, Ph3 assignmt modules 

944 

(3B0) 

8 

PPIOPEN 

Phi,2,3: Open list 

952 

(3B8) 

8 

PPIX11 

Exits for 

960 

(3C0) 

8 

PPIX21 

functions 

960 

(3C0) 

8 

PPIX31 

user initialization 

968 

(3C8) 

8 

PPIX15JX32 

Exits for 

976 

(3D0) 

8 

PPIX25 

modification 

976 

(3D0) 

8 

PPIX35 

logical record 

984 

(3D8) 

8 

PPIX17 

Exits for 

992 

(3E0) 

8 

PPIX27 

at end of phase 

992 

(3E0) 

8 

PPIX37 

closing user data sets 

1000 

(3E8) 

8 

PPIX18 

Exits 

1008 

(3F0) 

8 

PPIX28 

errors 

1008 

(3F0) 

8 

PPIX38 

for read 

1016 

(3F8) 

8 

PPIX19 

Exits 

1024 

(400) 

8 

PPIX29 

errors 

1024 

(400) 

8 

PPIX39 

for write 

1032 

(408) 

8 

PPIX61 

Exit to modify control fields 

1040 

(410) 

8 

PPIX16 

Exit when NMAX exceeded 

1048 

(418) 

4 

PPIADDCF 

When more than 12 ctl fields: 


addr of additional information 
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DISPLACEMENT FIELD DESCRIPTION: CONTENTS, 

DEC (HEX) SIZE NAME MEANING/USE 


1052 

(41C) 

4 

PPIDDSRT 

1056 

(420) 

1 


1057 

(421) 

3 


1060 

(424) 

4 

PPICHKAD 

1064 

(428) 

2 

PPIDCBIN 

1066 

(42A) 

2 

PPIDCBOU 

1068 

(42C) 

2 

PPITPCYL 

1070 

(42E) 

2 

PPIDPTRK 

1072 

(430) 

2 

PPICPTRK 

1074 

(432) 

3 

PPIAPGC 

1077 

(435) 

3 


1080 

(438) 

4 

PPINETAR 

1084 

(43C) 

4 

PPIFTTAB 

1088 

(440) 

8 

PPIJOBNM 

1096 

(448) 

8 

PPISTPNM 

1104 

(450) 

2 

PPIMXCOL 

1106 

(452) 

1 

PPIDEVCD 

1107 

(453) 

1 


1108 

(454) 

4 

PPIOPBAD 

1112 

(458) 

4 

PPIMOVEQ 

1116 

(45C) 

2 

PPIRPLDP 

1118 

(45E) 

2 

PPIVSMSL 

1120 

(460) 

4 

PPIVSMSG 

1124 

(464) 

4 

PPIVSI 


4 chars to replace SORT in 
DDnaraes (from param list when 
the program invoked) 

PPI version number 
Reserved 

Checkpoint module address 
Size of SORTIN DCB 
Size Of SORTOUT DCB 
No of trks/cyl. (disk wk areas) 
No of directory blocks/track 
(disk work areas) 

Track capacity in bytes 

Addr of permanently gen. core 

Reserved 

Addr of network table in phase 
work area 

BALN (disk) : pointer to table 
of formatted tracks 
Jobname 
Stepname 

Rightmost col included in any 
control field 

Device code for unit with RPS 
Reserved 

Addr of record in output buffer 

for Ph2 sequence check 

Addr of 2nd move rtn for equals 

RPL displ. from ACB 

Length of generated msg area 

Addr of general VSAM msg area 

Phi addr of VSAM read module 
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Index to PPI 


The following index covers PPI fields only. For any given subject* it 
shows the name of the PPI field referenced* plus the field's 
displacement from the beginning of the PPI area* in hexadecimal. 

Since all fields begin with the letters 'PPI*, these letters are 
omitted. 

When the reference is to a field which occupies a whole number of bytes* 
the displacement is shown in whole bytes. When the reference is to one 
or more bits within the field* the reference is given in the form 
'bytes.bits'. For example, the field PPISW1 is at displacement 560. A 
reference to *SW1*561.0' therefore means the first bit (bit 0) of the 
second byte in the field. 
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Ascending 

- order for SORTOUT SW1,563.2 

- order for merge pass SW1,563.3 
Assignment modules 

- size in phi P1ASZ,76 

BALN (disk) technique 

- being used SHI,561.2 

- on 2314 SHI,566.? 

- disk end addresses ENDAR,424 

- count of strings on 

each work area SEQCT,592 

- alternate merge order MRGAL,660 

- optimum merge order MRGOP,662 

- pointer to table of 
formatted tracks FTTAB,1084 

BALN (tape) technique 

- being used both SHl,560.4 

and SHI,561.1 

- count of strings on 

each work area SEQCT,592 

- current pass odd or 

even SHI,565.2 

Blocking 

- of input IPBLK,88 

Buffer, packing 

- displacement of PBUFF,104 
Buffers 

- size of input buffer LAB03,685 

- no. of input buffers LAB03,684 

- size of output buff. LAB07,689 

- no of output buffs LAB07,688 

- alignment SHI,563.? 

- no of phi buffers BUF1,92 

- no of ph2S3 buffers BUF23,628 

- addr of input buffer 

table LAB02,724 

- addr of phi buffer 

pool LAB06,736 

- addr of merge-only 

buffer pool LAB06,736 

Channels 

- types and combina¬ 
tions of channels SHI,565.3+4 

- tape switch (or al¬ 
ternative channel 

option) present SHl,564.? 

- >1 channel available SHI,564.? 
Checkpoint 

- being used SHI,562.7 

- module address CHKAD,1060 

Communication area 

for user USER,672 

Comparison techniques: 

- multiple techn used SHI,562.? 


- extract techn used SHI,562.? 
(see also F field) 

- addr of compare rtn AXERT,668 

- addr of 2nd move rtn 

for multiple techn MOVEQ,1112 
Control blocks 

- addr of DCB table STDCB,760 

- addr of IOB table STIOB,768 

- DCB addr of SYSLMOD 

user library SORCE,788 

- DCB addr of SORTLIB SLIB,796 

- size of SORTIN DCB DCBIN,1064 

- Size of SORTOUT DCB DCBOU,1066 
control fields 

- definitions: fieldl PCF01,114 

field2 PCF02,120 

field3 PCF03,126 


fieldl2 PCF12,180 

further fields— 
definitions pointed 
to by ADDCF,1048 

- no of fields NUMCF,112 

- rightmost column in¬ 
cluded in ctl fid MXCOL,1104 

- 'E' type present SHI,564.0 

- 'A* type present . SHI,563.2 

- 'D' type present SHI,563.2 

Control statements 

- SORT present SHI,564.1 

- MERGE present SHI,564.2 

- RECORD present SHI,564.3 

- MODS present SHI,564.4 

- RECORD absent or in¬ 
correct SHI,564.5 

Control word 

- length of LEXFD,676 

Counter (blocks) 

- addr of count table SBLCT,764 
Counter (records) 

- total records entering 

the phase RCDCT,588 

- records inserted INSCT,584 

- records skipped SKPRD,80 

- records deleted DELCT,580 

- records written to 

work units (ph2) COUNT,576 

- records written to 

SORTOUT (ph3) COUNT, 576 

- records deblocked fr 

SORTIN (OSCL, phi) COUNT,576 

Counter (strings) 

- no of strings to each 

work area (BALN only) SEQCT,592 


Section 5. Data Areas 153 



Licensed Material—Property of IBM 


CRCX technique 

- being used SHI,565.? 

- merge pass to follow SW1,566.? 


Data chaining 

- none 

- input 

- output 
DCB table 


SHI,561.3 
SW1,561.4 
SW1,561.5 


- address of STDCB,760 

Descending 

- order for SORTOUT SW1,563.2 

- order for merge pass SHI,563.3 
Disk sort 

- addr of disk directory DIRAD,280 

- no of SORTHK areas NDSKA,680 

- no of blocks/track BPTRK,682 

- no of tracks/cyl. TPCYL,1068 

- no of directory blocks 

per track DPTRK,1070 

- no of bytes/track CPTRK,1072 

- RPS feature used for 


SORTHK SHI,565.? 

- device code for unit 

with RPS DEVCD,1106 

- disk addresses,phi,2,3 DSKED,152 

- disk starting addr STAR,288 
End of file 


- reached for OSCL SHI,563.7 

Exits 


- none activated SHI,561.6 

* some activated SHI,561.7 

• those activated MODEX,568 


- pointers to routines: 


for 

Ell 



XII,952 

for 

E21 

or 

E31 

Xxl,960 

for 

E15 



X15,968 

for 

E25 

or 

E35 

Xx5,976 

for 

E17 



X17,984 

for 

E27 

or 

E37 

Xx7,992 

for 

El 8 



X18,1000 

for 

E28 

or 

E38 

Xx8,1008 

for 

E19 



X19,1016 

for 

E29 

or 

E39 

Xx9,1024 

for 

E61 



X61,1032 

for 

El 6 



X16,1040 

- linkage 

editor 

status LINK,572 


- DDname of user mod lib 


or DCB addr of SYSLMOD 
user lib S0RCE,788 

- when program invoked: 

phi exit address ATP1E,84 

ph3 exit address ATP3E,708 

Extract 

- routine being used SHI,560.2 

• length of control word LEXFD,676 

- size of area used by 

extract routine PGCSZ,96 

F field (constant used by Extract) 

- displacement of FFF,100 

File size 


- estimated 


SHI,563.6 


- given exactly SH2,571.0 

- value of FILSZ,604 

Final merge (phase 3) 

- size of work area P3GC,700 

- no. of bins (var) BDSVA,745 

- addr of next bin (var) BDSVA,744 

- addr of input buffer 

table BDSVA,744.1-3 

- addr of move list(fix) BDSVA,745 

- return addr to RCV ADSSC,804 

- pointers to modules used: 

RPG HRT,840 

read RD,856 

open list OPEN,944 

deblock DEB,816 

merge NET,824 

block BLK,832 

messages (assignment) AMC,936 
messages (running) RMC,923 

Fixed-length records (fix) 

- being used SHI,560.0 

Generated core, permanent 

- size of PGCSZ,96 

- address of ARGC,1074 

- address of network table 


in area NETAR,1080 

GETMAIN 

- addr of table of addr GETMN,780 

- addr of table of sizes GETSZ,784 
Initiation of the program 

- how achieved SHI,563.5 

Input buffers 

- no 5 size of buffers LAB03,684 

- addr of buffer table LAB02,724 
Input DCB 

- Size of SORTIN DCB DCBIN,1064 


Input device 

- used as work device SHI,565.5 
Input record blocking 

- blocking factor (fix) IPBLK,88 

- blocksize (var) IPBLK,88 

Input record length 

- up to 256 bytes SHI,562.? 

- >256 bytes SHI,562.? 

- LENGTH parameters from 


SORT or MERGE 
1 * 
la 
I3 

u 

Is 


statement: 

RCDL1,648 
RCDL2,650 
RCDL3,652 
RCDL4,654 
RCDL5,656 


Input to a merge 

- present SHI,563.7 

- sequence for SHI,563.3 

Intermediate merge (phase 2) 

- addr of phase work 

area PDMA,72 

- size of work area P2GC,696 


- addr of input buffer 

table BDSVA,744.1-3 

- addr of move list (fix) BDSVA,745 

- no of avail, bins(var) BDSVA,745 


154 



Licensed Material—Property of IBM 


- size and offset of 

major control field DD0L1,664 

- return addr to RCV ADSSC,804 

- pointers to modules used: 


algorithm 

ALG,808 

read 

RD,856 

deblock 

DEB2,864 

merge 

NETM,872 

block/deblock 

BLK2,880 

write 

HRT,840 

open list 

OPEN,994 

messages (assignment) AMB,936 

messages (running) 

RMB,923 

Invoked 


- program invoked 

SW1,563.5 

Job name 

JOBNM,1088 


Linkage editing 
- edited via sort/merge 
program: set for each 
exit in LINK,572 


Main storage 

- addr of next available 

byte SPGNl#720 

- addr of GETMAIN table 

of addresses GETMN,780 

- addr of GETMAIN table 

of sizes GETSZ,784 

- addr of permanently 

generated area ARGC,1074 

- addr of network table 

in perm. gen. area NETAR,1080 
Merge 

(see Final merge and 
Intermediate merge) 

Merge-only 

- being used 

- MERGE stmt present 

- assignment EOF 

- pointer to EODAD rtn EOF,904 
(see also Final merge) 

Merge order 

- maximum 

- alternate (BALN) 

- optimum (disk sort) 

Messages 

- print option used 
(FLAG or MSG param) 

- length of VSAM msg 
area 


SW1,561.? 
SW1,563.? 
SW1,562.7 


MRGMX,658 
MRGAL,660 
MR GOP,662 


P3ASZ,704 


VSMSL,1118 


- pointers to msg modules: 


phi 

phi 


assignment 
running 
ph2 assignment 
ph2 running 
ph3 assignment 
ph3 running 
VSAM 


AMA, 928 

RMA, 912 

AMB, 936 

RMB, 932 

AMC, 936 

RMC, 932 
VSMSG,1120 


- addr of conversion rtn, 

hex to char. CONV,896 

Multiple compare routine 

- being used either SW1,560.3 

or SW1,563.0 

- not being used SW1,560.2 

Odometer table 


(for OSCL) ODOM,288 

Options 

- DIAG used SW1,565.? 

- FLAG (or MSG) option P3ASZ,704 
??? 


OSCL technique 

- being used SW1,560.6 

- addr of unit count 

table UNTCT,772 

- addr of input buffer 

table, ph2 LABI0,776 

- pointer to module which 
initializes tree 6 

sorts INT,888 

- RMAX (max bytes on 

one work file) XCAP,616 

- RMAX reached SW1,566.? 

- count of records de¬ 
blocked from SORTIN COUNT,576 

- EOF SW1,562.? 1 

- user EOF SW1,566.? 

- user insert in process SW1,566.? 
Output blocking 

- blocking factor (fix) OPBLK,626 

- blocksize (var) OPBLK,626 

Output buffers 

- no. 6 size of buffers LAB07,688 

- address of buffer 1 LAB04,728 

- address of buffer 2 LAB05,732 


Output DCB 

- size of SORTOUT DCB DCBOU,1066 
Output device 

- output unit for ph3 OPFMP 

- unit address DEPHO,640 

Packing buffer 

- displacement of PBUFF,104 
Phase 

- which in progress SW1,560 

phi SHI,562.3 

ph2 SW1,562.4 

ph3 SHI,562.5 

Phase 1 
(see Sort) 

Phase 2 

(see Intermediate merge) 

Phase 3 

(see Final merge or Merge-only) 
Phase work area 
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Read/Write 


messages, running 

RMA,912 

- directory 

LABO1,200 

open list 

OPEN,952 

- error flags 

SW1,565.0-1 

EODAD routine 

EOF,904 

- block/deblock save 


Sorting 


area 

BDSVA,744 

- pointer to program 


- addr of DCB table 

STDCB,760 

work area 

WKARE,72 

- addr of IOB table 

STIOB,768 

- device types allowed DEV,576 

Record length 


- G (capacity of RSA, 


(see Input record length) 

in records) 

PPISRTG,62i 

RPS 


- B (work storage 


- used 

SW1,564.3 

blocking) 

SRTBL,624 

RSA 


- capacity of work 


- capacity, in records 

areas 

XCAP,616 

(G) 

SRTG,620 

Spanned records 


- no of entries in tbl LAB08,740 

- used in input 

MODEX, 570.' 

- addr of table 

LAB08,741 

- used in output 

MODEX,570. 

- bin size 

BINSZ,608 

Step name 

STPNM,1096 

- pointer to next 


Tape sort (general) 


available bin 

??? 

- tape table pointer 

TPPT,244 

Sequence check 


- tape table 

TP TBL,248 

- user option for 

DODO,692 

- inter-record gap 


- addr of record 

DOOBA,740 

size, in bytes 

IRG,612 

- addr of record in output 

- some or all tapes are 

buffer in ph2 

OPBAD,1108 

7-track 

SW1,567.4 

SKIPREC 


- tape switch (or alter¬ 

- being used 

SW1,562.2 

native channel) avail SW1,565. 

- count of records 


- deblock backward 

SW1,566.0 

skipped 

SKPRD,80 

- read forward 

SW1,566.1 

Sort (phase 1) 


- close with rewind 

SW1,566.2 

- assignment size 

PlASZ,76 

- block forward 

SW1,566.3 

- no of buffers 

BUF1,92 

- read forward later 

SW1,566.4 

- size of phase work 


Techniques, sequence distribution 

area 

P1GC,72 

- BALN (tape) both 

SW1,560.4 

- size of available 


and 

SW1,561.2 

main storage 

TAVLC,712 

- POLY 

SW1,560.5 

- addr of input buffer 

- OSCL 

SW1,560.6 

pool 

LAB06,736 

- BALN (disk) 

SW1,560.4 


- no of avail bins (var) BDSVA,753 

- addr of next bin (var) BDSVA,748 

- entry to move rtn 

(var) BDSVA,757 

- addr of move list (fix) BDSVA,748 

- collating order SW1,562.? 

- return addr to RCV ADSSC,804 

- pointers to modules used: 

algorithm ALG,808 

read ??? 

VSAM read VSI,1124 

deblock DEB,816 

sort NET,824 

block BLK,832 

write WRT,840 

move (var) VMV,848 

messages, assignment AMA,928 


and NOT SWl,560.2 

- CRCX SW1,566.6 

Tree 

- end address of TREND,716 

- addr of initializing 

module (OSCL) INT,888 

Variable-length records 

- present SW1,560.1 

VSAM 

- addr of VSAM read 

module, phi VSI,1124 

- addr of VSAM msg area VSMSG,1120 
Work areas, pointers to 

- program area (sort) WKARE,72 

- program area (merge) PDWA,72 
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Module ICEAM1: Generated Defaults 


The option values generated when the program is installed are stored in 
module ICEAM1. The format of the module is shown below. Values 
underlined are generated by default if no specification is made when the 
program is installed. The generated values can be changed by use of the 
IMASPZAP, HMASPZAP (VS1) or AMASPZAP (VS2) Service Aid Program. 


i -t -r 


| DISPLACEMENT 
j DEC (HEX) 

SIZE 

bytes 

J FIELD NAME 

1 

i— 


- 


( 0 

0 

4 

| SIZE 

1 

1 4 

4 

4 

1 

j MAXLIM 

1 

■ 

1 8 

8 

4 

1 

1 

j MINLIM 

1 

1 12 

C 

4 

1 

| RESALL 

1 

1 

1 18 

10 

4 

I 

1 

| RESINV 

1 

1 

| 20 

14 

4 

1 

J 

| MSGS 

1 

1 

| 24 

18 

1 

1 

1 

j EQUALS 

1 

1 25 

19 

1 

1 

j LIST 

1 

1 26 

1A 

1 

1 

j ERETJCL 

1 

| 27 

IB 

1 

I 

j ERETINV 
! 

| 28 

1C 

8 

1 

| PRINT 

1 

1 


I__X_X. 


”|" CONTENTS 1 

i I 

-f - i 

| X* 00FFFFF8* (representing MAX) | 

j or size value in hexadecimal | 

I I 

J Representing MAXLIM value in | 

j hexadecimal j 

j (Default: X100080000.') | 

I I 

| MINLIM value in hexadecimal j 

j (Default: X'00012000') j 

I I 

J All disk sorts reserved main | 

] storage value in hexadecimal j 

| (Default: X'00001000') I 

I I 

) Invoked sorts reserved main | 

j storage value in hexadecimal j 

j (Default: 0) j 

I ” I 

| ‘ NYYN * (FLAG (I)) j 

j 'NYNY* (FLAG (U) ) j 

| 'YNNY* (NOFLAG) j 

| *YNYN' (AC) j 

I I 

j 'Y* (YES) | 

| 'N* (NO) | 

] I 

J 'Y* (YES) | 

j ’N* (NO) j 

I I 

j *Y* (ABEND) j 

J 'N* (RC16) | 

1 I 

j * Y* (ABEND) j 

| 'N* (RC16) | 

I I 

| Message DDname for invoked | 

j sort (Default: “SYSOUT* ) j 

I I 

.t___ j 
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r" 

I 

DISPLACEMENT 
DEC (HEX) 

j 

r - 

SIZE 

bytes 

T- 

| FIELD NAME 

1 

i 

—r* 

1 

1 

CONTENTS 

1 

r 



— 

t- 

- 



i 


36 

24 

1 

1 VIO 

1 

•Y* 

(YES) 






1 

1 

1 

j 

•N* 

(NO) 



37 

25 

1 

1 EXCPVR 

1 

•Y' 

(YES) 






1 

j 

I 

] 

*N* 

(NO) 



38 

26 

1 

1 RESDNT 

1 

.y. 

(ALL) 






1 

1 

•M* 

(MON) 






1 

I 

1 

1 

•N* 

(NONE) 



39 

27 

1 

1 RELEASE 

1 

' Y * 

(YES) 






1 

1 

J 

1 

'N' 

(NO) 



40 

28 

1 

! SECALL 

1 

•Y* 

(YES) 






1 

I 

1 

1 

*N* 

(NO) 



41 

29 

1 

1 VERIFY 

1 

•Y* 

(YES) 






1 

j 

I 

• N_' 

(NO) 



42 

2A 

1 

1 BLKSET 

I 

•Y* 

(YES) 






1 

I 

1 

i 

•N* 

(NO) 



43 

2B 

1 

| CHALT 

1 

■C' 

(YES) 






i 

1 

I 

'A' 

(NO) 



44 

2C 

2 

| SVC 

1 

1 

X*0A6D' (the operations code 






1 

j 

for 

SVC 109 or SVC 200 through 






j 

1 

255 

in hexadecimal) 



46 

2E 

1 

' CHECK 

i 

1 

' Y * 

(YES) 






1 

1 

i 

1 

'N' 

(NO) 



47 

2F 

1 

I 

j SMF 

1 

1 

•F* 

(FULL) 






1 

| 

'S' 

(SHORT) 






1 

1 

1 

'N 1 

(NO) 



48 

30 

1 

j VBLKSET 

1 

| 

■Y' 

(YES) 






1 

1 

'N' 

(NO) 



49 

31 

256 

1 

j ALTSEQ 

1 

1 

Translate table for AQ 






1 

1 

control fields pefault: 






1 

1 

1 

1 

standard EBCDIC sequence) 


!-- 



L-- 

1 

-X----- 

1 

_X. 





j Note : If you have changed the generated values and reenterable modules! 
j are placed resident, you have to re-IPL the operating system to j 
|activate the changes. For SVS/MVS specify option CLPA when you j 
|re-IPL. ! 

i-J 
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Section 6. Debugging Aids 


This section is intended to help you if Sort behaves in an unexpected 

way, and you want to localize the problem and if possible solve or 

bypass it. It contains the following subsections: 

• How to decide whether a problem is due to a program error. 

• General considerations when an error has been located. 

• How the microfiche are organized. 

• Adding a temporary change to the maintenance area. 

• How Sort uses registers. 

• How to read a dump to find DCBs and IOBs for SORTIN, SORTOUT, and 
SORTWK. 

• Various uses of the DEBUG control statement. 

• Explanations of the diagnostic messages. 

• Explanation of program dumps. 

• Finding an object module in a storage dump. 

• Message-to-module cross reference. How to find messages in the 
code. 

• Cross references showing the displacement of each field in the 
common data areas (COMMON, COMMA, CPI, and PPI) for the various 
techniques. 

Other diagnostic aids are provided in Section 3, where the phase 
structures are given; Section 5, which shows the layout of some 
important control blocks; and Appendix A, showing which modules 
activate the various program exits. 


Defining Problem Cause 


If the program is unable to successfully complete sorting or merging, 
you will certainly get one or more program messages, and possibly also 
an ABEND code. 

The OS/VS Sort/Merqe Programmer's Guide gives explanations of the 
various program messages, and suggestions as to how to cope with them. 
It is assumed that you have exhausted those explanations before turning 
to this section. 
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| IS THIS A PROGRAM ERROR? 


Your first task is to decide whether or not the problem is due to an 
error in Sort code. 

If your installation has just installed a new release or PTF level of 
Sort, it is worth checking that any necessary additional alias names 
have been added to module ICEMAN. If they have not, mixed levels of 
program modules can be executed, which can give rise to unpredictable 
abnormal terminations. 

Otherwise, if Sort is run alone in its region, problems are unlikely to 
arise from the environment. If no routines of yours were invoking Sort, 
or being used at program exits, you can therefore work on the assumption 
that you have found a program error, and turn to the section 'Bypassing 
the Problem' below. 

However, if you are invoking Sort from a program of your own, or if you 
are using routines at program exits, you will need to eliminate your own 
programs as sources of error. In the example in Figure 16, for 
instance, an exit (El5) is being used. 


i------—--n 

I I 

| ICE000I - CONTROL STATEMENTS/MESSAGES - 5740-SM1 REL 4.0 ... | 


ICE074I 

ICE088I 

ICE093I 

ICE039A 


SORT FIELDS= (1,5,CH,A),EQUALS j 

RECORD TYPE=F,LENGTH = (1200, , 1000) | 

MODS E15=(E15,79000,MODSLIB,N) j 

RECORD LENGTH LI OR L3 OVERRIDDEN j 

SORTJOB.SORTSTEP, INPUT LRECL=1200, BLKSIZE=12000, TYPE=F j 
MAIN STORAGE = (MAX,262144,48528), NMAX=7300, PEERAGE j 

INSUFFICIENT MAIN STORAGE - ADD 6K BYTES j 

_ a 


| Figure 16. A Sample Set of Messages 


| POTENTIAL PROBLEMS WITH ROUTINES AT PROGRAM EXITS 
I Use of Registers 


| The first thing to check with your routines is that they observe the 
j standard linkage conventions. If, for example, they corrupt register 
j 12, results are unpredictable but almost certain to result in an ABEND 
j of some kind, because Sort uses register 12 as its main base register. 

| Check, too, that you are not using registers for loading or storing that 
| are accidentally causing overlay of sort code or work areas. If this 
j happens Sort could work without errors with one technique, but fail with 
j another. 
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Space 


The next thing to check is whether your routines are trying to use more 
space than you have allocated to them. Have you installed a new 
operating system release since the last time you used these routines? 
Each time you use an OPEN macro, for example, your program may take 
buffer space; but the amount it tries to take will depend upon such 
factors as the current release of the operating system. 

A change of operating system could therefore lead to an ABEND in your 
own routine; or it could lead to too little space being left for Sort. 

You can see whether too little space was left for sorting by studying 
the information in message ICE093I. As shown in Figure 16, the third 
field in the ‘MAIN STORAGE* parameter will tell you how much was 
actually left for Sort after your own routines had taken what they 
needed, in a region or partition of only 256K. Since in the example the 
input block size is large, the 48,528 bytes left are not enough. 

Similar situations can occur if Sort is dynamically invoked using the 
MAX option, and a fairly large reserved value is passed to Sort or taken 
by default. 

Another problem could arise if the E15 routine issues a GETMAIN without 
a corresponding FREEMAIN at the end. This problem can be caused 
indirectly, for example by leaving a data set open so that a buffer pool 
remains reserved. 


Record Contents 


If the output records do not appear to contain the same data as the 
input records, and either E15 or E35 has been used, check that your 
routine is handling register 1 correctly; especially, check that it is 
correct on return to Sort. 

If for example you first load register 1 and then restore all registers 
(including register 1), it will probably have the wrong contents. 

Equally, if you first restore all registers and then try to load 
register 1 from a corrupted base register, you will almost certainly 
pass the wrong information to Sort. 


POTENTIAL PROBLEMS WITH INVOKING PROGRAMS 


Space can also be a problem when you invoke Sort from another program, 
especially if you are using SIZE=MAX and invoking exit E15 or E35 (or, 
from COBOL, using an Input or Output procedure). 

If you do this, and particularly if you open a file in your exit 
routine, check that you specify a sufficiently large amount of reserved 
storage. 
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Considerations when an Error has been Located 


When you have pinpointed an error to a particular module, it is always 
worth doing a RETAIN search to find out whether the problem is already 
known. If the problem itself has not been reported, you can search for 
other APAR fixes to the failing module, and apply them if appropriate. 

If this procedure fails, you have the choice between trying to fix the 
problem, and trying to bypass it. You will then also want to report the 
problem. 


WHEN NOT TO WASTE TIME ON REPAIR 


Some modules contain extremely complex code. Attempts at field repair 
can be expected to take an unreasonable amount of time. 

The following load modules are particularly unsuitable candidates for 
field repair: 


ICEIPUT ICEIPVT 
ICEKPUT ICEKPVT 
ICEKPUS ICEKPVS 


BYPASSING A PROBLEM 


The simplest way of bypassing a problem in the program is to force it to 
use a different technique. Message ICE092I or ICE093I will tell you 
which sorting technique has been used. 

You can use the DEBUG control statement, described later in this 
section, to force the use or non-use of a specific technique. 
Alternatively, if the problem is in the Blockset technique (the newest 
| in the program), you can 'turn off 1 that technique altogether by 
| including an OPTION statement with the parameter NOBLKSET. 


ICEOPUT ICEOPVT 

ICEPAR 

ICERED 
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| REPORTING A PROBLEM 


You have two alternative means available for reporting a problems an 
incident report, or an APAR. 


Submitting an Incident Report 


Generally, central service needs the following information in a RETAIN 

incident entry: 

• Symptom 

• Was SORTIN or SORTOUT DD statement present? If so, list the DCB 
attributes. 

• Was Sort invoked from another program? If so, try to list the 
contents of the parameter list passed. See the OS/VS Sort/Merge 
Programmer’s Guide for parameter list format. At entry to Sort 
register 1 must point to the parameter list. Note, however, that 
(except with a standard disk sort) the initial contents of register 
1 are lost towards the end of Phase 0. 

• Was Sort invoked via JCL? If so, list all the program control 
statements used. 

• List Release and PTF levels, and if possible the APAR fixes applied 
since the last PTF. 

• Give the number of SORTWK data sets used, and their unit type. 

• If message ICE092I or ICE093I was issued, give its contents. 

• If you have a dump, list the Sort module (s) in storage when the 
program failed, and the displacement into the failing module at 
which the abend occurred. 


Submitting an APAR 


In addition to the information requested on an APAR form, you should 
supply the following information: 

• A dump from the failing run of Sort. 

• A list of PTFs applied, and if possible the APAR fixes applied since 
the last PTF. 

• Source code (Assembler or compiler listings) and object code for any 
user routines and/or invoking program. 

• A listing of the JCL. 

• A copy of the input file (s) in machine-readable form. 

• A list of program control statements used. 
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| • A list of the generation options selected, which can be produced by 
1 using IMASPZAP (or an equivalent program) to dump the contents of 
| module ICEAM1. 


I Microfiche Organization 


| For Peerage and Vale each load module is on one fiche, with the same 
| name as the load module name. For example, module ICEDEF is completely 
j contained on a fiche called ICEDEF. 

| Blockset has several fiches for each load module. Each- object module is 
j on a separate fiche. For example, load module ICEMESI consists of five 
| object modules (ICEMESI, ICEMESS, ICEEXII, ICEMSGI, and ICESUBS} , and is 
j on five fiches with those names, as shown in Figure 17. 




| Figure 17. Microfiche for Load Module ICEMESI 


| The other techniques have one fiche per load module, except for modules 
j ICERCM and ICERCZ. These two modules have an overlay structure, and are 
j shown with one fiche per object module. Section 3 gives -further details 
j of module organization under the heading 'Phase Structures'. 
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Adding a Temporary Change to the Maintenance Area 


Every new Sort module has a maintenance patch area. 

For Peerage and Vale the area is included in each load module. It is 
100 bytes long, or 5X of the size of the module, and is at the end of 
the module. It is usually addressable by using register 11 plus the 
appropriate displacement (which can be calculated from the microfiche) , 
and generally starts with the label PATCH in the source code. 

Blockset has a maintenance patch area of at least 64 bytes in each 
object module. It can be found in the fiche by looking for the label 
PATCH. 

The other, older techniques do not have patch areas. Instead you can 
use the EXPAND facility of the linkage editor to create one at the end 
of a module, if required. 

To use a patch area, first verify that it contains all zeros. Then use 
the appropriate utility (IMASPZAP, HMASPZAP, or AMASPZAP) to put in the 
required change. 

If the Sort reenterable modules are in the LPA library, do not forget to 
re-IPL with the CLPA option. 


How Sort Uses Registers 

In addition to the conventions described in Appendix D, the Peerage/Vale 
techniques make extensive use of certain internal register conventions. 
They are shown in Figure 18. 

| Register Use 

|-+■ 

I 

0-5 J Work registers 

I 

6 | Current RSA pointer 

I 

7 | Pointer to current record in input buffer for SORTIN 
| or SORTWK 

I 

8 | Pointer to current record in output buffer for SORTWK 
J or SORTOUT 

I 

10 | Internal return register when branch-and-link to 

j sub-routines is used 

I 

11 | Secondary base register 

I 

12 ) Primary base register 

I 

13 | Pointer to the common area (COMMA or COMMON) 


14-15 j Work registers 
| Figure 18. Use of Registers by Peerage/Vale Techniques 


_ a 


Section 6. Debugging Aids 165 








Licensed Material—Property of IBM 


I Finding DCBs and IOBs for SORTIN, SORTOUT, SORTWK 


| This subsection describes how to locate the I/O control blocks in a 
j system dump, for the standard disk techniques. 

| The first step is to verify, from message ICE092I or ICE093I, which of 
| the standard techniques has been used. 

| You should then find the common area. Look at the address pointed to by 
j register 13, and check whether the first word contains the characters 
j 'SMI*. If it does, register 13 is intact, and can be used when 
j calculating offsets. If it does not, and you are certain the Sort 
I program is being used, then register 13 has been corrupted. However, 
j you can still find the common area by looking for the eyecatcher 'SMI* 
j with which it begins. 


| BLOCKSET TECHNIQUE 
I SORTIN and SORTOUT Control Blocks 


| Figure 19 shows an example of interpreting a system dump for Blockset. 

| The procedure for finding input and output control blocks is as follows: 

| 1. Look in COMMON at label COMINDCB, which is at register 13 * X'154*. 

j There you will find a pointer to the SORTIN DCB. 

| 2. The SORTOUT DCB pointer is at label COMUTDCB, at register 

| 13 ♦ X'158'. 

| 3. There is no pointer from the DCBs to the corresponding IOBs, 

j because EXCP is used for access. However the IOBs are in the same 

| areas as the corresponding DCBs, at displacement X'48* from the 

j start of the DCB. 

| 4. A fullword at IOB ♦ X'14' points back to the DCB. 


I SORTWK Control Blocks 


| The procedure for finding SORTWK control blocks is as follows: 

| 1. Look in COMMON at label COMWKDCB, at register 13 * X'15C'. This is 

j a pointer to the DCB list. 

| 2. Follow the pointer to the SORTWK DCB list. Each element in the 

j list is a pointer to a DCB. The last element in the list has the 

j first bit on. 

| 3. As for SORTIN and SORTOUT, the access method used is EXCP. The IOB 

| for each work area follows the corresponding DCB, at DCB start 

j address ♦ x'48'. 
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Figure 19. Locating Control Blocks in a Dump with Blockset 
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| PEERAGE AND VALE TECHNIQUES 


The layout of all Peerage and Vale internal work I/O control blocks can 
be found in the microfiche for modules IGEMON and ICEDEV. 


SORTIN and SORTOOT Control Blocks 


First check which access method has been used. If EXCP was used, you 
will have received message ICE084I; otherwise (if SAM was used) you will 
not. 

1. Field CSORTIN in COMMA, at register 13 ♦ X'5FC*, points to the 
SORTIN DCB. 

2. Field CSORTOUT, at register 13 * X*600', points to the SORTOOT DCB. 

3. If EXCP is used, most I/O information is in a storage area, subpool 
0, with label OBSBLOCK. See Figure 20. A pointer to this area is 
in ICECOMMA at label COBSBLOK, at register 13 ♦ X'7E4*. 

At OBSBLOK ♦ X'8' there is an eyecatcher consisting of the 
characters 'OBSBLOCK*. 

The layout of OBSBLOCK is given in the microfiche ICEOBS and 
ICEXCP. 


a. In one of them, find the offsets to label OBSIOBP. 

b. Add the value of the EQO* (OBSIOBP) to the address of OBSBLOCK 
(taken from register 13 + X'7E4', as described above) , This 
gives the address of the IOB: if you are in Phase 1 it will be 
the SORTIN IOB; in Phase 3 it will be the SORTOOT IOB. If you 
are not sure of the phase, check the DCBs to see which one is 
open. 
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| Figure 20. Locating SORTIN and SORTOUT Control Blocks with EXCP in a 
j Dump with Peerage and Vale 
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4. OBSBLOCK also contains read/write and check simulators, used to 
simulate SAM access methods. The SORTIN and SORTOUT DCBs contain 
the addresses of the simulators, at DCB ♦ X'30' and DCB * X*34* 
respectively. 

5. After a read or write macro has been used to invoke a simulator, 
and before the subsequent check macro is issued, there are also 
valid pointers from OBSBLOCK to the DECB at the beginning of each 
buffer. See Figure 20. The address of the pointer list (a list of 
fake IOBs, or FIOBs) is at label OBSIFFIO. To find a DECB: 

a. Look in the fiche for ICEOBS or ICEXCP, and find label 
OBSFIOBP. 

b. Add the value of the EQU (OBSFIOBP) to the address of OBSBLOCK, 
taken from register 13 + X'7 e4*. 

c. The result is the address of a pointer to the first FIOB. 

d. The other FIOBs follow consecutively, each X*48* bytes long on 
a doubleword boundary. 

e. The DCB NCP value tells how many valid FIOBs there are. 

f. The FIOB plus 4 points to the DECB. 
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SORTWK Control Blocks 



Figure 21. Locating SORTWK Control Blocks in a Dump with Peerage/Vale 
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The procedure to find a work IOB is as follows: 

| 1. Look in COMMA at label CPAGELOC, at register 13 + X'4D4'. This 

field contains a pointer to a control block called BUFFAR. 

2. Follow the pointer to BUFFAR- At BUFFAR + X'4C* you will find a 
pointer to a control block called PAGED. 

3. Follow the pointer to PAGED. At PAGED ♦ X'4AC* is an area, WIOB, 
containing five control blocks. 

4. WIOB * X' 14' contains the IOB. IOB + X'14* points to the DCB. 

5. The WIOB control blocks are each X'80* bytes long, and follow each 
other consecutively. 

You can also go straight to the DCB, as follows: 

) The field CSORTWK in COMMA, at register 13 + X'61C', contains a pointer 
to the SORTWK DCB list. Each word in the list points to a work DCB, 
which forms part of a control block called WORKD. The last word in the 
list has the first bit on. 


The DEBUG Control Statement 


This statement is only valid when the program meets the criteria for the 
standard disk techniques. If it is supplied under other circumstances 
it is ignored. 

The statement is not intended for regular use; only the first two 
parameters are of general interest. The other parameters can be used to 
provide a temporary bypass, or to supply detailed information on program 
execution for use when optimizing or debugging the standard disk sort- 

DEBUG can be passed to an invoked sort by means of the SORTCNTL DD 
statement, for example: 

//SORTCNTL DD * 

| DEBUG BSAM 

This DD statement is described in full in the OS/VS Sort/Merge 
Programmer's Guide . Note that the DD name might not always be SORTCNTL, 
because the first four letters of Sort's special DD statement names can 
be changed for an invoked application. It might, for example, need to 
be called //TESTCNTL instead. See the chapter in the Programmer's Guide 
on invoking Sort from another program. The Blockset techniques will 
not be used when the DEBUG control statement is used with a SORTCNTL 
DD statement. 
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| SYNTAX 


| I (label] DEBUG ABEND .DUMP (.PEERVALE] .BALN 

| j NOABEND .NODUMP ,CRCX 

| | (.CLOCK] (.FLAG] (.CTRx] (,BSAM) 

j__ _ __ 


I 

I 

I 

J 


ABEND Overrides the generated default for action to be 

NOABEND taken when the program encounters an uncorrectable 

error. 

DUMP and NODUMP Recognized but ignored. 


PEERVALE With a disk sort one of the three standard techniques 

(Blockset. Peerage, or Vale) is normally used. If 
you have encountered a problem when using Blockset 
(see message ICE092I or ICE093I) . you can temporarily 
bypass this technique by specifying PEERVALE. thus 
forcing Peerage or Vale to be used. 


BSAM With the disk sort techniques Peerage and Vale. 

normally the EXCP access method is used for SORTIN 
and SORTOUT. If you encounter a problem related to 
this I/O activity you can temporarily bypass it by 
specifying BSAM. 


With a disk sort you can use this parameter to force 
either the balanced (BALN) or crisscross (CRCX) disk 
sorting technique and therefore bypass the standard 
disk sort techniques used by the program. If either 
BALN or CRCX is forced then the following 
restrictions apply: 

• At least three work data sets on the same type of 
device are needed, with amount as specified in 
OS/VS Sort/Merge Programmer's Guide . Mixed device 
types are not allowed. 

• Maximum record length must be less than work 
device track length. 

• Allocation must be contiguous (the CONTIG 
parameter is required). and only primary extents 
will be used. 

• Six or more work data sets are required for the 
CRCX technique. 

• For SORTWKnn: nn can be any number from 01 to 32. 
The first number must be 01 and the others must 
follow consecutively with no gaps. 

• Unused work space will not be released; the RLSE 
parameter must not be specified. 


BALN 

CRCX 
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CLOCK Instructs the program to measure elapsed and CPU 

(only Peerage times for the different phases, 
and Vale) 


FLAG (a) Instructs the program to print information messages 

(only Peerage (ICE120-125). These messages are listed under 
and Vale) 'Messages Produced by Using the DEBUG Statement*. 


CTRx=value Specifying this parameter will force Peerage or Vale 

to be used. The program will keep a count of the 
input or output records. When the count reaches the 
value specified the program will ABEND, and a 
formatted dump will be printed. 

The numbers that may be assigned to x are: 

2 Count of input records being moved from the input 

buffer. 

3 Count of output records being moved to the output 
buffer. 

4 Count of input records inserted by El5. 

5 Count of output records deleted by E35. 

Note : When the count reaches 'value*, the program will ABEND. It will 
also terminate with message ICE025A if the 'value* is a number greater 
than the number of input records. 
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| MESSAGES PRODUCED BY USING THE DEBUG CONTROL STATEMENT 

| Messages ICE120-125 are issued if the DEBUG statement is supplied with 
j the appropriate parameters FLAG (S) (only for Peerage and Vale sorts). 


| ICE120O RL=a B=b IL=C IS=d IB=e RM=f EM=g BA=h IX=j OX=k 
| Explanation: 

| This message relates to the Optimization part of the 

| definition phase (Phase 0) . 




RL record length (within the Sort); 

B blocking factor used for work areas; 

IL number of physical index blocks per logical 
index block; 

IS index entry size; 

IB number of indexes/physical index block; 

RM maximum number of strings to be merged in 
one pass of Phase 2; 

EM maximum number of strings to be merged in 
Phase 3; 

BA base bin size; 

IX number of input buffers; 

OX number of final output buffers. 


| ICE121C ET=a CT=b BN=c X=d TO=e SN=f G=g 
J Explanation: 


| This message relates to Phase 1. 




ET elapsed time taken in centiseconds; 

CT CPU time in centiseconds; 

BN number of blocks handled; 

X number of EXCPs issued; 

TO number of tracks put out; 

SN number of strings produced; 

G number of records in the record storage area. 


I G 

| ICE122R ET=a CT=b BN=C X=d RM =e PN=f BT=g TO=h 
| Explanation: 


I 


This message relates to Phase 2 (Reduction) . 




ET elapsed time taken in centiseconds; 

CT CPU time in centiseconds; 

BN number of work data set blocks handled; 

X number of EXCPs issued; 

G number of records in the record storage area; 
RM maximum number of strings to be merged in 
one pass of Phase 2; 

PN highest partition number; 

BT number of tracks handled more than once. 

TO number of tracks put out; 
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ICE123E 


ICE124P 


ICE1250 


G 

ET=a CT=b BN=C X=d EM =e TO=f BT=g 
Explanation: 

This message relates to Phase 3. 

ET elapsed time taken in centiseconds; 

CT CPU time in centiseconds; 

BN number of work data set blocks handled; 

X number of EXCPs issued; 

G number of records in the record storage area; 
EM maximum number of strings to be merged in 
Phase 3; 

TO number of tracks put our; 

BT number of tracks handled more than once. 


ET=a CT=b PE—C RP=d CX=e CO=f C0=g CR=h G=i MB=j 
Explanation: 

This message relates to Phase 2 (Partitioning) . 

ET elapsed time taken in centiseconds; 

CT CPU time in centiseconds; 

PE 'peerage': the number of logical strings 

obtained by logically rearranging the tracks 
of physical strings; 

RP number of partitions; 

CX number of exempt blocks; 

CO number of overflow blocks; 

CO number of blocks in partition 0; 

CR number of blocks to be handled by partition 0; 

G number of records in the record storage area; 

WB number of blocks written back to work storage. 


CT=a GP=b SA=e X=d 


Explanation: 

This message relates to work I/O, and is cumulative: 
it appears after each of Phases 1-3, and shows 
cumulative totals each time. 

CT CPU time in centiseconds; 

GP number of work I/O blocks; 

SA number of standalone seeks; 

X number of EXCPs issued. 
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I Messages Produced by Using the DIAG Option 


Diagnostic messages are obtained when you specify the DIAG option in the 
PARM field of the EXEC job control statement. This option is only 
available for tape techniques, a merge-only application, or when forcing 
a non-standard disk technique. 

The DIAG option impairs program performance, and should be removed as 
soon as it is no longer needed. 


The diagnostic messages are as follows: 


|ICE900I GENERATED CORE END ADDRxx 
|ICE901I INPUT BFR TBL ADDRxxxx 
JICE902I OUTPUT BFR ADDR xxxx,xxxx 
|ICE903I RSA TBL ADDR xxxx 
|ICE904I TREE ADR FROM xxxx TO xxxx 
|ICE905I MOVE RTN ADDR xxxx 
|ICE906I DCB TBL ADDR xxxx 

I 

| ICE907I 0/P CCW ADDR xxxx | 

I I 

jICE908I OUTPUT IOB ADDR xxxx i 

I I 

jICE909I OPEN LIST ADDR xxxx j 

I I 

|ICE920I GENERATED CORE END ADDR xxxx| 

I I 

j ICE921I INPUT BFR TBL ADDR XXXX | 

I I 

JICE922I OUTPUT BFR ADDR xxxx,xxxx 

l j 

|ICE9231 MOVE RTN ADDR XXXX j 

I ! 

|ICE924I DCB TBL ADDR j 

I I 

|ICE925I 0/P CCW ADDR xxxx j 

j __ . _ J 

j 4 Appears frequently; provides the stc 


ICE926I IOB TBL ADDR xxxx 

ICE9271 I/P CCW ADDR xxxx 

ICE940I GENERATED CORE END ADDR 

ICE941I INPUT BFR TBL ADDR xxxx 

ICE942I OUTPUT BFR ADDR XXXX,XXXX 

ICE943I MOVE RTN ADDR xxxx 

ICE944I ECB TBL ADDR XXXX 

ICE945I I/P CCW ADDR xxxx 

ICE961I TECHNIQUE xxxx 

ICE962I NO/SIZE OF BFRS, PH x, X, xxxx 

ICE963I MAX.SYSGEN CORE xxxx 

ICE964 CALC. CORE PHl=xxxx 

ICE9651 MERGE ORDER=Xxxx 

ICE988I ICEyyy LOC. AT xxxx 4 

ICE989I CLOCK - xx,xx,xx a 

ICE990I NO OF STRINGS PROD BY PHI xxxxxxx 

‘ting addresses of the program modules. | 


a Appears at the beginning of each phase (except Phase 0) , and at the end of 
the program. 
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I Pumps 


| There are two types of failure that can cause dumps: 

| • Sort-detected uncorrectable errors which give critical error 
j messages. 

| • Sort program failures that are detected by the operating system. 


I NORMAL ABEND DUMPS 


| The default ERETINVIERETJCL=ABEND|RC16, which was set when Sort was 
j installed, can be overridden in a standard disk sort by the DEBUG 
j control statement or by the PAKM Field Option DIAG. To obtain a normal 
j ABEND dump you must provide a SYSUDUMP or SYSABEND DD statement. 

| An invoked tape sort program, upon detecting an error, will give a 
j return code of 16 unless DIAG is specified in the PARM Field Option, and 
j a SYSUDUMP or SYSABEND DD statement is provided. 


| THE TRACE TABLE 


| In main storage the TRACE table is stored for Blockset in COMMON at 
| COMTRACE (Register 13 ♦ X*818') and for Peerage and Vale in ICECOMMA at 
j CTRACE (Register 13 ♦ x*814'). in a formatted dump it is eliminated 
j from ICECOMMA dump and shown separately at the end of the FORMATTED DATA 
j (see Figure 22). The TRACE table can hold up to 128 trace records, each 
| one byte long. The table is divided into four fields: 



t -- - 

—r- 


~T~ 



I FIELD 1 

| FIELD 2 

1 

FIELD 3 

1 

. | 

FIELD 4 

1 

| 4 bytes 

| 32 bytes 

— t — 

_j_ 

32 bytes 

i 

_L- 

60 bytes 

_1 


| The table is initialized with zeros. 


| How Events are Recorded 
| Four types of events are traced 


l — -1 

| Type 

1 — J 

Blockset 

\ ""peerage"and"Vale" """ " ^ 

j. I. _i „ 

1 Type 1 
j Type 2 

J Type 3 
j Type 4 

Record level 

Block level 

Blockset level 

Mainly module level 

Record level | 
Block level j 
Main loop level j 
Module level | 


178 













Licensed Material—Property of IBM 


The object is to keep a long trace of Type 4 events, a shorter trace of 
Types 3, and 2, and only a short trace of Type 1. For this reason 
record insertion is carried out as follows: 

• A new event is inserted at the end of the field corresponding to the 
type number; Type 4 goes at the end of field 4, Type 3 at the end of 
field 3, etc. 

• All records to the left of the new one move one byte to the left; the 
leftmost one (in Field 1) is thus lost. 


Format of an Event Record 

The Event record is one byte long, and consists of a description code. 
There are 255 codes (X'OO* - X'FF*). 
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EVENT-TABLE DESCRIPTION FOR BLOCKSET 


BLOCKSET 


TRACE 

SEGMENT 

MODULE 



DESCRIPTION 

1,01 


ICECOBV 



E15 CALL, COBOL MODE 

1,01 


ICEE15B 



CALL E15 

1,02 


ICECOBV 



E15 ANSWER, COBOL MODE 

1,02 


ICEE15B 



RETURN FROM E15 

1,03 

C4C0BIN 

ICEIPUM 



CALL E15 

1,03 


ICE15V 



E15 CALL, SORTIN MODE 

1,04 

C4COBIN 

ICEIPUM 



RETURN FROM E15 

1,04 


ICE15V 



£15 ANSWER, SORTIN MODE 

1,07 

C4LOAF35 

ICEE35B 



CALL E35 

1,08 

C4L0AF35 

ICEE35B 



RETURN FROM E35 

1,09 

C4LOAF35 

ICEE35B 



CALL E35 

1,09 

C5REXE35 

ICE35VL 



E35 CALL, SORTOUT MODE 

1 , 0A 

C4LOAF35 

ICEE35B 



RETURN FROM E35 

1,0 A 

C5REXE35 

ICE35VL 



E35 ANSWER, SORTOUT MODE 

1,0B 

C5REXCOB 

ICE35VL 



E35 CALL, COBOL MODE 

1,0C 

C5REXC0B 

ICE35VL 

BLOCK 

LEVEL 

E35 ANSWER, COBOL MODE 





2,11 

C4DXLBLD 

ICEIPUB, 

KPUB, 

OPUB 

DATA TRANSFER LIST BUILD 

2,12 

C4CHKI0 

ICEIPUB, 

KPUB, 

OPUB 

CHECK I/O TRANSFER 

2,13 

C4PUTVIR 

ICEKPUV 



PUT VIRTUIAL BLOCK RECORD 




DLU^rvOC. 1 LlvlL 

3,21 

C4PICKUT 

ICEIPUM 



PICK A BVD FOR OUTPUT 

3,22 

C4MAKKAD 

ICEIPUM 



MAKE KAD ENTRIES 

3,23 

C4C0NVIM 

ICEIPUB, 

KPUB, 

OPUB 

CONVERT IRRR TO MBBCCHHR 

3,24 

C4CONVIM 

ICEIPUB, 

KPUB, 

OPUB 

CONVERT MBBCCHHR TO IRRR 

3,26 

C4PARBLK 

ICEKPUA, 

OPUA 


PARTITION INPUT BLOCKS 

3,27 

C4GETSPC 

ICEKPUB 



GET SORTWORK SPACE 

3,28 

C4KYBVDK 

ICEKPUS, 

OPUT 


KEY BVD MERGE 

3,29 

C4KEYI0 

ICEKPUS, 

0PUT 


KEY INPUT/OUTPUT 

3,2A 

C4C0PIN 

ICEKPUA, 

OPUA 


COUNT RECORDS IN BUFFER 

3,2B 

C4C0P0UT 

ICEKPUA, 

OPUA 


COUNT OUTPUT RECORDS IN RSA 

3,2C 

C4DUMPIN 

ICEKPUA, 

OPUA 


DUMP OUT INPUT BUFFERS 

3,2D 

C4HIL0AD 

ICEKPUA, 

OPUA 


HIGH-TO-LOW SELECT LOAD ROUTINE 

3,2E 

C4ALTLST 

ICEKPUA, 

OPUA 


ALTERNATE LIST PREPARATION 

3,2F 

C4BNDSET 

ICEKPUA, 

OPUA 


SET BLOCK BOUNDS 

3,30 

C4MERGIN 

ICEKPUA, 

OPUA 


MERGE INPUT LISTS 

3,31 

C4PRUNE 

ICEKPUA, 

OPUA 


ADD A LIST TO SELECTION TREE 

3,34 

C4SETCMP 

ICEKPUB, 

OPUB 


SET COMPARE AND BRANCH MODES 

3,36 

C4STARK 

ICEKPUB 



START/STOP I/O 

3,37 

C4STARK 

ICEKPUB 



STOP SORTWORK INPUT 

3,38 

C4STARK 

ICEKPUB 



START SORTWORK OUTPUT 

3,39 

C4STARK 

ICEKPUB 



START KEY INPUT 
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EVENT-TABLE DESCRIPTION FOR BLOCKSET, Continued 


- BLOCKSET - 

TRACE SEGMENT MODULE DESCRIPTION 


3,3A 

C4STARK 

ICEKPUB 


3,3B 

C4TRELL 

ICEKPUB, 

OPUB 

3,3C 

C4TRELL 

ICEKPUB, 

OPUB 

3,3D 

C4THIGH 

ICEKPUS, 

OPUT 

3,3E 

C4PIKBAK 

ICEKPUS 


3,40 

C4KYCYLK 

ICEKPUS 


3,41 

C40UTBAK 

ICEOPUT 


3,42 

C4FILLUT 

ICEOPUA 


3,43 

C4L0ADUT 

ICEOPUA 


3,44 

C4BACKUT 

ICEOPUT 


3,45 

C4KYCYLO 

ICEOPUT 


3.46 

3.47 

C4KYBVDO 

ICEOPUT 

ICELIMI 


3,48 

C4TRKSET 

ICEOPUA 


3,49 

C4RUN0UT 

ICEOPUA 


3,4A 

C4ST0UT 

ICEOPUB 


3,4B 

C4ST0UT 

ICEOPUB 


3,4C 

C4STOUT 

ICEOPUB 


3,4D 

C4STOUT 

ICEOPUB 


3,4F 

C4ALCATA 

ICEIPUK, 

KPUT 

3,4F 

C4WAITI0 

ICEIPUB, 

KPUB 

3,50 

3.50 

3.51 

3.52 

3.53 

3.54 

3.55 

3.60 

3.61 

3.62 

3.63 

3.64 

C40UTPUT 

ICEOPUT 

ICEIPVM 

ICEIPVM 

ICEIPVM 

ICEIPVM 

ICEIPVM 

ICEIPVM 

ICEKPVS 

ICEKPVS 

ICEKPVS 

ICEKPVS 

ICEKPVS 


3,70 

C50UTPVT 

ICEOPVT 


3,71 

C50UTPVT 

ICEOPVT 


3,72 

C50UTPVT 

ICEOPVT 


3,73 

C50UTPVT 

ICEOPVT 


3,74 

C50UTPVT 

ICEOPVT 



START SORTWORK INPUT 

TREE LAD LIST RESTORE - HIGH TO 

LOU 

TREE LAD LIST RESTORE - LOU TO 

HIGH 

PREPARE TREE FOR HIGH TO LOU 
SELECT 

PICK BOUNDARY VALUE FOR OUTBACK 

KEY CYLINDER 

URITE BACK TO SORTUORK 

FILL OUT OUTPUT AREA 

LOAD SORTOUT BUFFERS 

WRITE BACKOUT DATA 

KEY CYLINDER 

KEY BVD KAD MERGE 

TEST WRITEBACK LIMIT 

TRACK SET ALLOCATION 

SELECT AN OUTPUT RUN LIST 

STOP SORTWORK INPUT 

START SORTWORK OUTPUT 

START/STOP I/O 

START SORTWORK INPUT 

ALLOCATE AND INIT. I/O XFER AREA 

PERFORM WAIT FUNCTION 

OUTPUT PASS 

SORTIN TO RSA 

BUILD SORTWORK BLOCKS 

PREPARE TO WRITE TO SORTWORK 

URITE SORTUORK BLOCKS 

SORTIN + E15 TO RSA 

CALL ICECOBV. E15 TO RSA. 

GET NEXT BLOCKSET KAD 

EMPTY INPUT INTO RSA 

WRITE SORTED OUTPUT, THEN EMPTY 

INPUT 

WRITEBACK, THEN EMPTY INPUT 

FLUSH OUTPUT 

WAIT ON BLOCKSET READ 

EMPTY INPUT BUFFERS 

ISSUE NEXT BLOCKSET READ 

MERGE DUMPED RECORDS INTO RSA RUN 

RESTORE SORTED OUTPUT 
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EVENT-TABLE DESCRIPTION FOR BLOCKSET, Continued 


BLOCKSET 


TRACE 

SEGMENT 

MODULE 



DESCRIPTION 

3,75 

C50UTPVT 

ICEOPVT 



PARTIAL DUMP MERGE DUMP RECS INTO 
INTO RSA RUN 

3,76 

C50UTPVT 

ICEOPVT 



PARTIAL DUMP - RESTORE SORTED 
OUTPUT 

3,77 

C5UTBAKV 

ICEOPVT 



WRITEBACK TO SORTWORK 

3,78 

C50UTPVT 

ICEOPVT 



CALL ICE35VL FOR COBOL RESTORE 

3,79 

C50UTPVT 

ICEOPVT 



FLUSH RSA 

3,7A 

C5REST0R 

ICEOPVA 



CALL ICE35VL FOR E35 INTERFACE 
SUPPORT 




I'lUUULC LCVCL 

4,4E 

C4STARI0 

ICEIPUB, 

KPUB, 

OPUB 

ISSUE EXCP 

4,AO 

C4KEYMRG 

ICEKPUS, 

OPUT 


UPDATE BLOCKSET KAD INDEX (WITH 
I/O) 

4, A1 

C4KEYPUT 

ICEKUPS, 

OPUT 


WRITE HIGH IN-CORE INDEX KADS TO 
DISK 

4, A1 

C4XAREA 

ICEIPUT, 

KPUT 


TRANSFER AREA INITIALIZATION 

4,A3 

C4E0VIN 

ICEIPUM 



HANDLE EOF ON SORTIN BEFORE SVC 

4, A4 

C4FINDIN 

ICEIPUM 



FIND SORTIN MBBCCHHR 

4, A6 

C4E0F 

ICEIPUT 



SET SORTOUT TRANSFER SPACE 
REQUIREMENTS 

4, A7 

C4DEBFIX 

ICEIPUB, 

KPUB, 

OPUB 

FIX DEVICE MODIFIERS BEFORE FIX 
SVC 

4, A8 


ICEE15B 



RETURN FROM E15 WITH RC=8 

4, A9 

C4C0BIN 

ICEIPUM 



RETURN FROM E15 WITH RC=8 

4, A A 

C4ADRESS 

ICEIPUB, 

KPUT, 

OPUB 

PUT REAL ADDRESSES IN IOBS, DXLS 

4, AB 

C40SPACE 

ICEKPUT 



OPUT SPACE COMPUTATIONS 

4,AC 

C4KSPACE 

ICEKPUT 



KPUT TRANSFER SPACE COMPUTATIONS 

4, AE 

C4RELSE 

ICEKPUT 



RELEASE EXCESS DISK SPACE 

4, AF 

C4MAINFI 

ICEKPUV 



PREPARE MIAN STORAGE PRIMARY FILE 

4,BO 

C4L0AF35 

ICEE35B 



TRACE RC 8 RECEIVED 

4, BL 


ICEIPUT 



INITIALIZE FOR INPUT PHASE 

4, B2 


ICEIPUT 



REINITIALIZE AFTER SORTIN EOV 

4, B4 

C4INPUT 

ICEIPUM 



INPUT PASS 

4, B5 


ICEKPUT 



INITIALIZE FOR PHASE 2 AND 3 

4, B6 


ICEKPUV 



VIRTUAL BLOCK CONSTRUCTION 

4, B7 


ICEEXIK 



EXIT FROM KEY PHASE BEFORE 
EXITTERM 

4, B8 

C4V0BL0K 

ICEKPUV 



VIRTUAL OUTPUT MERGE BLOCK 
CONSTRUCTION 

4, B9 

C4VIBL0K 

ICEKPUV 



VIRTUAL INTERUM MERGE BLOCK 
CONSTRUCTION 

4, BB 


ICEKPUS 



KAD WRITEBACK MERGE (START OF 
MODULE) 

4, BC 


ICEKPUS 



KAD WRITEBACK SORT 

4, BD 


ICEOPUT 



HANDLE RECORDS AND INDEXES 
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EVENT-TABLE DESCRIPTION FOR BLOCKSET, Continued 

- BLOCKSET - 

TRACE SEGMENT MODULE DESCRIPTION 


4,CO 

4,Cl 

4, C2 

4,C3 

4, DO 
4, DI 
4, D2 
4, D3 
4, D4 
4, D5 
4, D6 
4, D7 
4,D8 
4, D9 

4, DA 
4, DB 
4, DC 
4,DF 
4, EO 
4, El 
4.E2 
4, E3 

4.E6 

4, E7 
4,E8 

4, EA 
4, FO 
4, FI 
4 > F2 
4,F9 
4, FA 
4, FB 
4»FC 


C5KEYCVL ICEOPVT 

C5KADCRE ICEOPVT 

C5KADCRE ICEOPVT 

C5BAKUTV ICEOPVA 

ICEIPVT 
ICEIPVT 
ICEIPVT 
C5CODVRT ICEIPVT 
ICEIPVM 
ICEIPVM 
ICEIPVM 
ICEIPVM 
ICEIPVM 
ICEIPVM 

ICEIPVM 
ICEIPVM 
ICEIPVM 
ICEGENV 
ICEKPVT 
ICEKPVT 
ICEKPVT 
C50PINIV ICEKPVT 

ICEKPVV 

ICEKPVV 

ICEKPVV 

ICEKPVV 
ICEOPVT 
C50UTPVT ICEOPVT 
C50UTPVT ICEOPVT 
ICECOBV 
ICE15V 

C5REXE35 ICE35VL 
C5REXC0B ICE35VL 


VLR MODULES - 

BUILD BLOCKSET KADS FOR WRITEBACK 
CYL 

BUILD KAD FROM WBACK AREA IN-CORE 
INDEX 

BUILD CYL KAD FOR WRITEBACK AREA 
INDEX 

TERMINATE WBACK LOAD DUE TO RSA 

END OF 0 

ICEIPVT ENTRY 

ALLOCATE ICEIPVT IOX 

BUILD ICEIPVT RSA 

CONVERT ICEIPVT CODE TO BINS 

IPVM ENTRY OR REENTRY 

PRIME SORTIN 

EOV ON SORTIN - E15 

EOV ON SORTIN - NO E15 

REINITIALIZE AFTER EOV - E15 

REINITIALIZE AFTER EOV - NO 

SORTIN 

EOF ON SORTIN - EI5 
EOF ON SORTIN - NO E15 
RSA IS FLUSHED. 

ICEGENV ENTRY 

ICEKPVT ENTRY 

BEGIN ICEKPVT ALLOCATION 

CREATE SORTED IN-CORE INDEX 

FREEMAIN AND REALLOCATE FOR 

ICEOPVT 

BUILD BLOCKSET KADS FROM SKAD 
KADS 

CALL KPVS TO SORT SMALL KADS 
BUILD BLOCKSET KADS USING KPVS 
OUTPUT 

BUILD BLOCKSET KADS FOR ICEOPVT 
ICEOPVT TRACE 
RSA FLUSHED - SORTOUT 
RSA FLUSHED - NO SORTOUT 
RC 8 FROM E15, COBOL MODE 
RC 8 FROM E15, SORTIN CODE 
RC 8, SORTOUT MODE 
RC 8, COBOL MODE 
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Event-Table Description for Peerage and Vale 


PEERAGE AMD VALE 


TRACE 

SEGMENT: 

DESCRIPTION 

1,01 

CREMAIN: 

TRACE E15 IN 

1,01 

VREMAIN: 

TRACE E15 IN 

1,01 

VREMAINN: 

TRACE E15 IN 

1,02 

CREMAIN: 

TRACE E15 RETURN 

1,02 

VREMAIN: 

TRACE El5 RETURN 

1,02 

VREMAINN: 

TRACE E15 RETURN 

1,03 

CROOUT: 

TRACE E35 ENTRY 

1,03 

VROOUT: 

TRACE E35 ENTRY 

1,04 

CROOUT: 

TRACE E35 RETURN 

1,04 

VROOUT: 

TRACE E35 RETURN 

1,05 

VIMOUT: 

TRACE E35 ENTRY 

1,05 

LIMOUT: 

TRACE E35 ENTRY 

1,05 

LIVOUT: 

TRACE E35 ENTRY 

1,06 

VIMOUT: 

TRACE E35 RETURN 

1,06 

LIMOUT: 

TRACE E35 RETURN 

1,06 

LIVOUT: 

TRACE E35 RETURN 

2,3E 

WROUK: 

WRITE TO WORK FILE 

2,3F 

VEDLAST: 

WAIT FOR READ FROM WORK FILE 

2,3F 

WROUK: 

WAIT FOR READ FROM WORK FILE 

2,40 

WROUK: 

WRITE TO WORK FIELD 

2,41 

WROUK: 

WAIT FOR WRITE TO WORK FILE 

2,42 

CREINIT: 

ISSUE A READ 

2,42 

CREMAIN: 

ISSUE A READ 

2,42 

VREMAIN: 

ISSUE A READ 

2,42 

VREMAINN: 

ISSUE A READ 

2,42 

VREMININ: 

ISSUE A READ 

2,42 

VREMINIT: 

ISSUE A READ 

2,43 

CREMAIN: 

CHECK WAIT FOR READ 

2,43 

CREMAINN: 

CHECK WAIT FOR READ 

2,43 

VREMAIN: 

CHECK WAIT FOR READ 

2,44 

CROEND: 

ISSUE A WRITE 

2,44 

VROEND: 

ISSUE A WRITE 

2,44 

VROOUT: 

ISSUE A WRITE 

2,44 

CROOUT: 

ISSUE A WRITE 

2,45 

CROEND: 

CHECK FOR WRITE 

2,45 

VROEND: 

CHECK FOR WRITE 

2,45 

VROOUT: 

CHECK FOR WRITE 

2,45 

CROOUT: 

CHECK FOR WRITE 

2,46 

WORKFEOB: 

DATA BLOCK WRITTEN ON AN INTERMEDIATE WORK AREA 

2,48 

REDSUBG: 

EXCHANGE AND WRITE OUTPUT 

2,4A 

VEDLAST: 

READ FROM WORK FILE 

2,4 A 

VEDAHEAD: 

START OF MERGE PASS 

2,4B 

VEDMAIN: 

START OF MERGE PASS 

2,4C 

VEDMAIN: 

START OF A SUBPASS 

2,4F 

REDSUBR: 

WAIT FOR I/O 

2,50 

LIMRFILL: 

TRACE EMTY/READ 

2,52 

LIMXWRT: 

TRACE EXCHANGE / WRITE 

2,53 

LIMSUBR: 

TRACE WAIT 

2,54 

LIVFLUSH: 

TRACE SORTOUT WRITE 

2,54 

VIMMAIN: 

TRACE SORTOUT WRITE 

2,54 

VIMOUT: 

TRACE SORTOUT WRITE 

2,54 

LIMOUT: 

TRACE SORTOUT WRITE 

2,54 

LIVOUT: 

TRACE SORTOUT WRITE 

2,54 

VIMLAST: 

TRACE SORTOUT WRITE 

2,55 

LIVFLUSH: 

TRACE SORTOUT CHECK 

2,55 

VIMMAIN: 

TRACE SORTOUT CHECK 
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- PEERAGE AND VALE 

TRACE SEGMENT: DESCRIPTION 


2,55 VIMOUT: TRACE SORTOUT CHECK 

2,55 LIMOUT: TRACE SORTOUT CHECK 

2,55 LIVOUT: TRACE SORTOUT CHECK 

2,55 VIMLAST: TRACE SORTOUT CHECK 

3,B9 MOVERTBN: PRIMING A NEW STRING 

3,B9 BOSTRING: END OF STRING PROCESSING 

3,BA CRESUBR: BLOCK AN INDEX INTO AN INDEX OUTPUT BUFFER 
3,BB PARWRIT1: WRITES A BLOCK OF WRITEVACK INDEXES DURING 

SORT OR FORWARD HASH PASS 

3,BB PARWRIT2: WRITES A BLOCK OR WRITEBACK INDEXES DURING 

SORT OR FORWARD HASH PASS 

3,BB PARWRIT3: WRITES A BLOCK OR WRITEBACK INDEXES DURING 

FINAL SORT 

3,BC PARWRTBO: WRITES A BLOCK OF WRITEBACK INDEXES DURING 

SORT OR FORWARD HASH PASS 

3,BC PARWRTB1: WRITES A BLOCK OR WRITEBACK INDEXES DURING 

SORT OR FORWARD HASH PASS 
3,BD PARREADO: READ A LOGICAL INPUT INDEX BLOCK 
3,BD PARREAD1: READ A WRITEBACK BLOCK 

3,BE PARBLOCK: BLOCKS A LOGICAL BLOCK OF INDEXES TO OUTPUT 

3,BF PARDBLK: DEBLOCK INDEXES 

3,CO PARMRG: MERGES THE CHAIN OF SORTED INDEXES 

3,Cl PARSRT: SORTS A DEBLOCKED LOGICAL INDEX BLOCK 

3,C2 REDINIT: TRACE SUBINDEX PRIME 

3,C3 REDMAIN: MAIN TRACK ENTRY 

3,C4 REDREAD: TRACE TRACK READ 

3,C5 REDBACK: GET WRITE BACK 

3,C6 REDWRITE: TRACE OUTPUT TRACK 

3,C7 REDFLUSH: WRITE LAST INDEX BUFFER AN WAIT ALL 

ACTIVE WORK I/O 

3,CB REDSUBR: FIND RECORD TO START WRITE-BACK 

3,CC REDSUBR: TRACE SEEK PROCESSING 

3,CD LIMMAIN: TRACE MAIN ENTRY AND INITIATE READ 

3,CE LIMMAIN: TRACE MAIN READ 

3,CF LIMBACK: WRITEBACK 

3,DO LIMSUBR: TRACE FINDBACK 

3,D1 LIMSUBR: TRACE INDEX GET 

3,D2 LIMSUBR: TRACE SEEKS 

3,D4 BINALLC: TRACE REPACK IN 

3,D5 BINALLC: TRACE REPACK OUT 

3,D6 VREFLUSH: ENTER USER CODE AT El7 

3,D6 VREFLUSH: TRACE EXIT IN ENTER USER EOD ROUTINE 

3,D6 VREMAIN: TRACE EXIT IN ENTER USER EOD ROUTINE 

3,D6 VREMAINN: TRACE EXIT IN ENTER USER EOD ROUTINE 

3,D6 VREMININ: TRACE EXIT IN ENTER USER EOD ROUTINE 

3,D6 VREMININ: ENTER USER CODE AT El6 

3,D6 VREMINIT: ENTER USER CODE AT Ell 

3,D6 VREMINIT: ENTER USER CODE AT El6 

3,D6 VROEND: ENTER USER CODE AT El8 

3,D6 VROEND: ENTER USER CODE AT E17 

3,D6 VROEND: ENTER USER CODE AT E31 

3,D6 VROEND: ENTER USER CODE AT E37 

3,D7 VREFLUSH: BACK FROM USER CODE AT E17 

3,D7 VREFLUSN: TRACE EXIT OUT 

3,D7 VREMAIN: TRACE EXIT OUT 

3,D7 VREMAINN: TRACE EXIT OUT 

3,D7 VREMININ: TRACE EXIT OUT 

3,D7 VREMININ: BACK FROM USER CODE AT E16 

3,D7 VREMINIT: BACK FROM USER CODE AT Ell 

3,D7 VREMINIT: BACK FROM USER CODE AT E16 
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|-PEERAGE AND VALE 

I TRACE SEGMENT: DESCRIPTION 


3,D7 VROEND: BACK FROM USER CODE AT El8 

3,D7 VROEND: BACK FROM USER CODE AT E17 

3,D7 VROEND: BACK FROM USER CODE AT E31 

3, D7 VROEND: BACK FROM USER CODE AT E37 

4, DE SORTWOUT: TO AVOID EXIT THRU MANEXIT AT I/O TASK 

PUT A MARK IN THE TRACE TABLE 
«,DF ICECRE ENTRY 

4,DF ICEVRE ENTRY 

4,E0 CREINIT: TRACE PRIME RSA 

4,E0 VREMININ: TRACE PRIME RSA 

4,E0 VREMINIT: TRACE PRIME RSA 

4,El CREINIT: INITIALIZE WORK FILE ROUTINE 

4,El VREMININ: INITIALIZE WORK FILE ROUTINE 

4,El VREMINIT: INITIALIZE WORK FILE ROUTINE 

4,E2 CROEND: RESTORE TREE REGISTER AND GET WORK AREA ADDR 

4,E2 VROEND: RESTORE TREE REGISTER AND GET WORK AREA ADDR 

4,E3 CREFLUSH: FLUSH RECORDS REMAINING IN RSA TO WORK FILES 

4,E3 VREFLUSH: ENTER USER EOD ROUTINE, IF DEFINED 

4,E3 VREFLUSN: ENTER USER EOD ROUTINE, IF DEFINED 

4 f E4 ICE PAR ENTRY 

4,E5 PARSORTO: READ THE INPUT INDEX FILE 

4,E6 PARHASO: FINISHES ORDERING OF INDEXES 

4,E7 PARHAS1: PROCESSES INDEXES PRODUCED BY PARHSO 

4,E8 PARSORT1: ORDER THE INDEXES FOR REDUCTION PHASE 

4,E9 ICEPAR EXIT 

4,EA PARTERM: FLUSH REMAINING PROCESSED INDEXES 

4,EB VEDPROLG: ICEVED ENTRY 

4,EB ICERED 

4,EC EXITPH13: ICEVED EXIT 

4,EC ICERED EXIT 

4,ED ICELIM ENTRY 

4,ED ICELIV ENTRY 

4,EE ICELIM EXIT 

4,EE ICELIV EXIT 

4,EE ICEVIM EXIT 

4,EF ICECRE EXIT 

4,EF ICEVRE EXIT 

4,EF ICEVRN EXIT 

4,F0 ICEDEF ENTRY 

4,FI ICEDEC ENTRY 

4,F2 ICEDEG ENTRY 

4,F3 ICEDEV EXIT 
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FORCING A SPECIALLY FORMATTED DUMP 


This option is only available for Peerage and Vale. 

The default ERETJCL|ERETINV=ABEND|RC16, which was set when Sort was 
installed, can be overridden in a standard disk sort by the DEBUG 
control statement. 

To obtain a specially formatted dump for a sort, the CTRx=value must be 
specified in the DEBUG statement. This first prints a SNAP dump 
(corresponding to a normal SYSUDUMP dump), followed by formatted 
information as shown in Figure 22. 

The formatted part of the dump is derived from the source code, which is 
written in the PL/S language. As shown in Figure 23 this is not 
difficult to interpret, even without a knowledge of PL/S. However, if 
you would like to know more about the language you can find much 
information, including how to read source code, in the publication 
Guide to PL/S , GC28-6794. 

Example: 

DEBUG ABEND,CTR2=1 


Section 6. Debugging Aids 187 




Licensed Material—Property of IBM 


| A SYSTEM DUMP | 

j SNAP dump corresponding to a normal SYSUDUMP dump. j 

I I 

© FORMATTED DATA J 

j 2.1 Save areas j 

j The standard save areas used by different levels of j 

j the program. { 

I I 

| 2.2 ABEND code | 

j A fullword with the format X'xxsssuuu', where j 

|j xx is the standard ABEND code prefix, j 

j sss is the system completion code at program j 

j failure (or zeros) , and | 

j uuu is the user completion code at uncorrectable j 

j error (or zeros) . j 

j This code is equal to zero for definition j 

j errors, and equal to the message number for i 

j other errors (for example, *046* would represent j 

j message ICE046A). j 

I I 

| 2.3 A fullword containing the address of the instruction f 

j at which failure occurred. j 

I I 

| 2.4 Register contents when program failure occurred: 16 | 

I fullwords giving the register contents in the order j 

| 0-15. | 

j 2.5 Contents of ICECOMMA (sort variables) formatted when j 

| program failure occurred, with offsets from Register f 

| 13, comments, labels, and definitions. j 

I I 

|| 2.6 Trace of important events, in the form j 

I I 

I * yyy I 

I I 

1 where x identifies the part of the program j 

I I 

I yyy identifies the segment of code entered. | 

I I 

| x can be one of the following codes: f 

I I 

| | DEF - definition (ICEDEF) j 

|| C creation (ICECRE, ICEVRE, ICEVRN) j 

j P - partitioning (ICEPAR) j 

|j R reduction (ICERED, ICEVED) | 

|| E elimination (ICELIM, ICEVIM, ICELIV, ICEVIP) | 

j A - appendage (for PCI* channel end, or end-of-extent) S 

I I 

| The first event listed is the most recent*; j 

j the last is the first that occurred (normally DEF ENTRY) . J 

j *If one of the most recent events listed concerns an exit, the | 

| probable cause of program failure is a programming error in the exitj 

I routine. j 


| Figure 22. Contents of a Specially Formatted Dump 
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Displacement (in Comment from 
hex) from the start the source code 
ofICECOMMA 1 


DISPL. COMMENT 


The data definition level: 
a ’level 3' area is always a 
subset of the preceding 
'level 2 ’ area, and so on 


LEVEL 


Label from One of the standard 
the source PL/S data attributes, 
code eg PTR(31), meaning 

j a fuUword pointer 


LABEL ATTR 


Comment of the area 
when the dump was 
taken , 


VALUES 


0000 

/* 

SUPERVISOR AND DM 

SAVE AREA*/ 

2 

CSAVEOS 

PTR (31) 


00E2D4F1 

0004 











000C4FB0 

0008 










(Vi 

000C91F8 

oooc 











700C4E7A 

0010 











000C632C 

0014 











OOODOOOO 

0018 











OOOC9590 

00D0 











OOOE2478 

O0D4 











A00DFEA0 


/* 

LEVEL 

3 

ROUTINE SAVE AREA 

*/ 

2 

CSAVEL3 


5\ 


OOD 8 

/* 

ABEND 

- 

ABEND CODE 

*/ 

3 

* 

PTR(31) 

'= / ''800C1 000 

OODC 

/* 

ABEND 

- 

INTERRUPT 

PSW END 

*/ 

3 

* 

PTR(31) 

(3V 

-600CA0FC 

OOEO 

/* 

ABEND 

- 

REGISTER 

0 

*/ 

3 

* 

PTR(31} 


FFFFFFFC 

00E4 

/* 

ABEND 

- 

REGISTER 

1 

V 

3 

* 

PTR(31) 


OOOOOOD2 

OOE 8 

/* 

ABEND 

- 

REGISTER 

2 

V 

3 

* 

PTR (31) 


00000000 

OOEC 

/* 

ABEND 

- 

REGISTER 

3 

V 

3 

* 

PTR(31) 


00000008 

00F0 

/* 

ABEND 

- 

REGISTER 

4 

*/ 

3 

* 

PTR (31) 


000D4750 

00F4 

/* 

ABEND 

- 

REGISTER 

5 

*/ 

3 

* 

PTR(31) 


000002D4 

00F8 

/* 

ABEND 

- 

REGISTER 

6 

*/ 

3 

* 

PTR(31) 


000D4C7E 

OOFC 

/* 

ABEND 

- 

REGISTER 

7 

*/ 

3 

* 

PTR(31) 


OOOE051C 

0100 

/* 

ABEND 

- 

REGISTER 

8 

*/ 

3 

* 

PTR(31) 


00000000 

0104 

/* 

ABEND 

- 

REGISTER 

9 

*/ 

3 

+ 

PTR(31) 


OOOCAOEO 

0108 

/* 

ABEND 

- 

REGISTER 

10 

*/ 

3 

* 

PTR(31) 


000D0D4C 

01 OC 

/* 

ABEND 

- 

REGISTER 

11 

*/ 

3 

* 

PTR(31) 


000D15FE 

0110 

/* 

ABEND 

- 

REGISTER 

12 

V 

3 

* 

PTR (31) 


AO0DO820 

0114 

/* 

ABEND 

- 

REGISTER 

13 

*/ 

3 

* 

PTR (31) 


OOOC9240 

0118 

/* 

ABEND 

- 

REGISTER 

14 

*/ 

3 

* 

PTR (31) 


600D1002 

one 

/* 

ABEND 

- 

REGISTER 

15 

*/ 

3 

* 

PTR(31) 


00000000 ^ 

0120 

/* 

WORK 

AREA 

V 


2 

CTEMP1 

FIXED(31) 


000C936C 


/* 

WORK AREA 

*/ 


3 

CWORK1 

FIXED (31) 




/* 

WORK 

AREA 

V 


4 

* 

CHAR(1) 




/* 

WORK 

AREA 

*/ 


4 

CTEMP124 

PTR (24) ( 5 ) 




/* 

WORK 

AREA 

*/ 


5 

5CWORK124 

PTR (24) w 




/* 

WORK 

AREA 

*/ 



* 

CHAR (1) 




/* 

WORK 

AREA 

*/ 



CTEMP115 

FIXED(15) 




/* 

WORK 

AREA 

V 



CWORKl16 

FIXED(16) 




/* 

WORK 

AREA 

*/ 



* 

CHAR(1) 




/* 

WORK 

AREA 

*/ 



CTEMP108 

PTR( 8 ) 




/* 

WORK 

AREA 

*/ 



CWORKl08 

PTR( 8 ) 




(J) Save areas: The standard save 
areas are allocated at the be¬ 
ginning of ICECOMMA 

@ ABEND CODE: In the 

example the program ended 
with system completion 
code X’OCl’. 


( 3 ) Last instruction: The address 
of the failed instruction, in 
this case X’OCAOF 6 \ 

( 4 ) Register contents: Shows the 
register contents when the 
program failed 


(5) ICECOMMA: Remaining 
contents of ICECOMMA 
are shown in the same way. 
For example, field CTEMP1 
(also known as CWORK1) 
contained X’000C936C’ 
CTEMP124, a subset of the 
larger area, thus contained 
X’C936C’ 


Figure 23. Interpreting a Formatted Dump 
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Finding an Object Module in a Storage Dump 

As shown in Figure 24, the name of each module appears at the beginning 
of the module in the storage dump. 


LPA/JPA 

OB7CCO 

067020 

CB7040 

CB7060 

0B7080 

0B70A0 

CB70CO 

087060 

CB710C 

0B7120 

0e7140 

0B716C 

0B718J 

Ce71AC 

0B71C0 

OB71EO 

0B720C 

087223 

087240 

CB7260 

CB7280 

087’’ ‘ 


PCDULE 
C9C3C5C4 
E340C9C2 
18214100 
45F0CC3C 
D5G7C418 
C0FE41A0 
4 7F0C092 
D39858F0 
005B58FC 
45F0F016 
50A00134 
C74FC203 
C16247F0 
1CC4C200 
5010D1CC 
100AC4F4 
1EF0E8F0 
201041F0 
96402000 
20C4BF0F 

SO '-" 


ICEPCfs 

C6054040 

0440C3D6 
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Figure 24. The Start of a Module in a Dump 

Each module starts with a header consisting of the eight-byte module 
name followed by the release and PTF number. Some modules have a 
copyright notice visible after the header. 

The module entry point comes after this preliminary material. 

With the Blockset technique each load module consists of many object 
modules. Details are given in Section 3 under 'Phase Structures'. Each 
object module starts with a header as for the other techniques. 
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Origin of Program Messages 

This subsection shows which modules issue each message. It also tells 
you how to locate a given message in the source code. This can be 
useful if, for example, you encounter an error in Phase 0, and can thus 
not get a dump. 


BLOCKSET TECHNIQUE 


To find a Blockset message in the code, you should look in the cross 
reference for labels with the following format: 

MSGOxxy 

where xx is the message number and y is a letter of the alphabet. The 
letter A means this is the first use of the message in this module, B 
means it is the second, and so on. For example, MSG046B would be the 
second occurrence of message ICE046A. 
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ALL OTHER TECHNIQUES 


To find a Peerage or Vale message in the code, you should look in the 
cross reference for labels with the following format: 

DIAGxxy 

where xx is the message number and y is a letter of the alphabet. The 
letter A means this is the first use of the message in this module, B 
means it is the second, and so on. For example, DIAG46B would be the 
second occurrence of message ICE046A. 

Exceptions to the above rule occur in modules ICEDEC and ICEDED, which 
also use tables for issuing messages. There you should look for labels 

SERRxxy 

or 

SNERRxx 

where xx is the message number, and y is the letter L or P. 
other Message Cross-Reference Tables 
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Cross-Reference Tables 

CPl-PPI CROSS-REFERENCE TABLE 


The following table contains the names of CPI and PPI fields together 
with their displacements; the last three letters of the names of modules 
that reference them; and the manner in which the modules are related to 
them. A dash is used to separate the module name from the related code. 
The codes are as follows; 

U The information in the field is u sed by the module. 

M The information in the field is created or m odified by the module. 

It may also be u sed. 

0 Non-specific relationship exists between the module and the field. 
Either or both of the o ther two codes may, or may not, be 
applicable. 


Field 

Displacement 

Addressed by Modules 




CPIADDCF 

(EB) 

RCI-U 

RCM-M 

RCN-U 

RCI-U 

RC2-U 


CPIAQTB 

(133) 

RCM-M 

RCI-U 





CPIATP1E 

<C7) 

RCI-U 

RCM-M 

RCI-U 




CPIATP3E 

(CD) 

RCI-U 

RCL-U 

RCM-M 

RCI-U 



CPIAUENT 

(112) 

RCH-M 

RCI-U 





CPIBINSZ 

(C2) 

BGA-U 

BGB-U 

RCN-M 

RCR-U 

RCS-U 

RCI-U 

CPIBUF1 

(E5) 

BGA-M 

BGB-M 

RCI-U 




CPIBUF23 

(AE) 

BGA-M 

BGB-M 

RCL-M 

RCI-U 



CPIDCBIN 

(FA) 

BGB-U 

RCI-M 

RCL-U 

RCS-U 

RCI-U 

8CI-M 

CPIDCBOU 

(FC) 

BGB-U 

RCI-M 

RCL-U 

RCS-U 

RCI-U 

8CI-M 

CPIDDSRT 

(F6) 

RCI-U 

RCM-M 

RCI-U 




CPIDEV 

(102) 

BGB-U 

RCI-M 

RCI-U 




CPIDEVCD 

(132) 

RCI-M 

RCI-U 





CPIFFF 

(A«) 

RCI-U 

RC2-M 





CPIFILSZ 

(D3) 

RCM-M 

RCS-U 

RCI-U 

8CI-M 



CPIIPBLK 

(A2) 

BGB-U 

RCI-M 

RCS-U 

RCI-U 



CPIJOBNM 

(1 IF) 

RCM-M 

RCZ-U 

RCI-U 




CPILAB03 

(BC) 

BGA-M 

BGB-U 

RCI-M 

RCL-U 

RCS-U 

RCI-U 

CP XLAB07 

(BE) 

BGA-M 

BGB-M 

RCL-M 

RCS-M 

RCI-U 

RC2-M 

CPILAB09 

(9A) 

BGA-M 

BGB-M 

RCI -M 

RCL-M 

RCS-U 

RCI-U 

CPILINK 

(E8) 

RCH-M 

RCM-U 

RCO-M 

RCZ-U 

RCI-U 


CPIMODEX 

(CA) . 

BGA-U 

BGB-U 

RCH-U 

RCI-M 

RCL-U 

RCM-M 

CPIMRGAL 

(E7) 

BGA-M 

BGB-M 

RCI-M 

RCL-U 

RCM-M 

RCI-U 

CPIMRGMX 

(E6) 

BGA-M 

BGB-M 

RCL-M 

RCI-U 



CPIMSGDD 

(116) 

RCB-U 

RCM-M 

RCO -M 




CPIMXCOL 

(130) 

RCI-U 

RC2-M 





CPIWUMCF 

(48) 

RCI-U 

RCM-M 

RCN-U 

RCI-U 

RC2-U 


CPINWKU 

(9E) 

BGB-U 

RCI-M 

RCL-U 

RCN-U 

RCS-U 

RCI-U 

CPIOPBLK 


RCI-M 

RCI-U 





CPIPBUFF 

(A6) 

RCI-U 

RC2-M 





CPIPCF01 

(4A) 

RCI-0 

RCM-M 

RCN-0 

RCI-U 

RC2-0 


CPIPGCSZ 

(CO) 

BGB-U 

RCL-U 

RCS-U 

RCI-U 

RC2-M 


CPIP1ASZ 

(AO) 

RCI-U 






CPIP1GC 

(DC) 

BGA-M 

BGB-M 





CPIP1RSZ 

(DC) 

BGB-U 

RCI-M 

RCS-U 

RCI-U 



CPIP2GC 

(DF) 

BGA-M 

BGB-M 





CPIP2RSZ 

(DF) 

BGB-U 

RCS-U 

RCI-U 




CPIP3ASZ 

(AA) 

RCB-U 

RCM-M 

RCZ-U 

RCI-U 



CPIP3GC 

(E2) 

BGA-M 

BGB-M 






196 




Licensed Material—Property of IBM 


Field Displacement Addressed by Modules 


CPIP3RSZ 

(E2) 

BGB-U 

RCI-M 

RCL-M 

RCS-U 

RCI-U 




CPIRCDL1 

(B2) 

BGA-U 

8CI-U 

BGB-U 

RCI-M 

RCL-U 

RCM-M 

RCR-U 

RCS-U 

RCI-U 

CPIRCDL2 

(B4) 

BGA-D 

BGB-U 

RCI-M 

RCL-U 

RCM-M 

RCN-U 

RCR-U 

RCS-U 

CPIRCDL3 

(B6) 

BGA-U 

BGB-U 

RCI-M 

RCL-U 

RCM-M 

RCS-U 

8CI-U 


CPIRCDL4 

(B8) 

RCI-M 

RCM-M 

RCN-U 






CPIRCDL5 

(BA) 

BGB-U 

RCI-M 

RCM-M 

RCN-U 

RCR-U 

RCS-U 



CPIRECFM 

(11E) 

RCI-M 

RCI-U 







CPISESDS 


8CI-M 








CPISIRG 

(D9) 

BGA-M 

RCI-U 







CPISKPRD 

<C4) 

RCM-M 

RCI-U 







CPISKSDS 


8CI-M 








CPISMAX 


RCI-U 

RCM-M 







CPISORCE 

(EE) 

RCH-M 

RCI-U 







CPISRTBL 

(BO) 

BGA-M 

BGB-M 

RCI-M 

RCS-U 

RCI-U 




CPISRTG 

(D6) 

BGA-M 

BGB-M 

RCI-U 






CPISTPNM 

(127) 

RCM-M 

RCZ-U 







CPISUENT 

(115) 

RCH-M 

RCI-U 

RC2-U 






CPISVSAM 


RCI-U 

8CI-U 







CPISVSIN 


BGB-U 

RCI-U 

RCL-U 

RCS-U 

8CI-M 




CPISVSOP 


BGB-U 

RCI-U 

RCL-U 

RCR-U 

RCS-U 

8CI-M 



CPISW1 

(92) 

BGA-M 

BGB-M 

RCD-M 

RCH-M 

RCI-M 

RCL-M 

RCM-M 

RCN-M 



RCP-U 

RCS-U 

RCZ-U 

RCI-U 

RC2-U 

8CI-M 



CPISW14 


BGB-U 

RCI-M 

RCN-U 






CPISW17 


RCN-M 








CPISW2 

(12F) 

BGB-U 

RCI-U 

RCL-U 

RCM-M 

RCO-U 

RCR-U 

RCS-U 

RCZ-U 



RCI-U 

8CI-M 







CPITAVLC 

(DO) 

BGA-M 

BGB-M 

RCL-U 

RCM-M 

RCS-U 

RCI-U 



CPIXCAP 

(F8) 

BGA-M 

RCI-U 







PPIADDCF 

(418) 

AOM-U 

RCZ-U 

RCI-M 






PPIADSSC 

(324) 

ABF-U 

ABL-U 

ABM-U 

ABN-U 

ABO-U 

ABP-U 

ABQ-U 

ABR-U 



ABS-U 

AGA-U 

AGC-U 

AGD-U 

AGE-U 

AGF-U 

AGG-U 

AGI-U 



AGJ-U 

AGK-U 

AGL-U 

AGM-U 

AGN-U 

AOA-U 

AOB-U 

AOC-U 



AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 

AOM-U 

APA-U 

APB-U 



APD-U 

APE-U 

APF-U 

APG-U 

APH-U 

API-U 

APK-U 

APL-U 



RBJ-U 

RBK-U 

RBM-U 

RBO-U 

RBW-U 

RBX-U 

RCT-U 

RCV-M 



RC6-U 

RC7-U 

RC8-U 

RDD-U 

RDE-U 

RDG-U 

RDR-U 

RDS-U 



RDT-U 

RDU-U 

RGB-U 

RGL-U 

RGM-U 

RGV-U 

ROI-U 

ROJ-U 



ROK-U 

RON-U 

ROP-U 

ROQ-U 

ROR-U 

ROS-U 

ROT-U 

RPA-U 



RPB-U 

RPC—U 

RPD-U 

RPE-U 

RPF-U 

RPG-U 

RPM-U 

RPV-U 



8BO-U 

80N-U 

9BN-U 

9BO-U 

9GB-U 

9GC-U 

9GN-U 


PPIALG 

(328) 

AOI-U 

AOJ-U 

AOK-U 

AON-U 

AOR-U 

AOS-U 

AOT-U 

RCT-0 



RC6-0 

RC7-M 

RC8-M 

RC9-0 

RDR-U 

RDS-U 

RGB-U 

RGC-U 



RGL-U 

ROW-U 

ROY-U 

RPA-U 

RPB-U 

RPD-U 

RPE-U 

RPG-U 



8GB-U 

8PA-U 

90N-U 






PPIAMA 

(3A9) 

ABF-U 

ABS-U 

AGA-U 

AGI-U 

AGN-U 

AOA-U 

AOB-U 

AOC-U 



AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 

APA-U 

APB-U 

APC-U 



APG-U 

APL-U 

RC9-0 

9GN-U 

9PA-U 




PPIAMB 

(3A8) 

ABR-U 

AGB-U 

AGC-U 

AGG-U 

AGJ-U 

AGL-U 

AGM-U 

APD-U 



APE-U 

APH-U 

APJ-U 

APL-U 

9GB-U 




PPIAMC 

(3A8) 

ABL-U 

ABM-U 

ABN-U 

ABO-U 

ABP-U 

ABQ-U 

AGD-U 

AGE-U 



AGF-U 

9GC-U 

AGH-U 

AGK-U 

APF-U 

API-U 

APK-U 

9BN-U 

9BO-U 

PPIAPGC 

(432) 

RCB-U 

RCI-M 

RC6-U 

RC7-U 

RC8-U 




PPIATP1E 

(54) 

ADD-U 

ADE-U 

ADR-U 

ADS-U 

ADU-U 

AOQ-U 

APC-U 

APF-U 



RCI-M 

RC6-U 







PPIATP3E 

(2C4) 

ABM-U 

ABO-U 

APF-U 

RCI-M 

RC8-U 

RPG-U 

9BO-U 


PPIAXERT 

(29C) 

AOA-U 

AOB-U 

AOC-U 

AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 



AOL-U 

80N-U 

AOM-U 

AOP-U 

AOQ-U 

RCI-M 

ROW-U 

ROY-U 

RPC-U 
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PPIBDSVA 

(2E8) 

ABC-U 

ABF-U 

ABH-U 

ABJ-U 

ABQ-M 

ABR-M 

ABS-M 

ABT-U 



ABU-D 

ABV-U 

ABW-U 

ABX-U 

ABZ-U 

ADE-U 

ADG-U 

ADH-M 



ADI-M 

ADL-M 

ADS-M 

ADT-M 

ADX-M 

AGA-U 

AGB-U 

AGC-U 



AGD-U 

AGE-M 

AGG-U 

AGH-U 

AGL-U 

AGM-U 

AGN-U 

AOI-M 



AOJ-M 

AON-M 

AOQ-U 

APA-U 

APC-M 

API-M 

APJ-U 

APK-U 



RBA-M 

RBC-U 

RBE-M 

REG-U 

RBH-U 

RBI-U 

RBJ-U 

RBK-U 



RBM-U 

RBP-U 

RBT-U 

RBU-U 

RBV-U 

RBW-U 

RBX-U 

RBZ-U 



RCT-U 

RDC-U 

RDD-U 

RDE-M 

RDG-M 

RDI-U 

RDL-U 

RDQ-U 



RDR-U 

RDS-M 

RDT-M 

RGB-U 

RGL-U 

ROK-M 

RON-U 

ROS-U 



RPC-U 

RPF-U 

RPM-U 

80N-U 

9BN-U 

9BO-U 

9GB-U 

9GC-U 



90N-M 








PPIBINSZ 

(260) 

ABF-U 

ADE-U 

ADG-U 

ADP-U 

ADQ-U 

ADS-U 

ADT-U 

APC-U 



APG-U 

APL-U 

RCK-U 

RC1-M 

RDB-U 

RDC-U 

RDD-U 

RDP-U 



RDQ-U 

RDR-U 

RDS-U 

RDT-U 





PPIBLK 

(340) 

ABA-U 

ABB-U 

ABC-U 

ABE-U 

ABL-U 

ABM-U 

ABN-U 

ABO-U 



ABP-U 

ABY-U 

ABZ-U 

ROA-U 

ROB-U 

ROC-U 

ROD-U 

ROE-U 



ROF-U 

ROG-U 

ROH-U 

ROP-U 

ROQ-U 

RPA-U 

RPB-U 

RPG-U 



8PA-U 

9BN-U 

9BO-U 






PPIBLK2 

(370) 

ABG-U 

ABH-U 

ABI-U 

ABJ-U 

ABK-U 

ABT-U 

ABU-U 

ABV-U 



ABW-U 

ABX-U 

RGB-U 

RGC-U 

RGL-U 

ROP-U 

ROQ-U 

RPA-U 



RPD-U 

RPE-U 

8GB-U 

8PA-U 





PPIBPTRK 

(2AA) 

AGC-U 

AGE-U 

RCJ-M 

ROK-U 

RPB-U 

RPE-U 

8CK-M 

8GB-U 



9PA-U 








PPIBUF1 

(5C) 

APB-U 

APG-M 

APL-U 

RCJ-U 

RCK-M 

RC1-M 

8CK-M 


PPIBUF23 

(274) 

APH-U 

API-U 

APL-U 

RCK-M 

RC1-M 

8CK-U 



PPICHKAD 

(424) 

AGH-U 

APC-U 

APF-U 

APJ-U 

RC9-M 

RON-U 

ROS-U 

ROT-U 

PPICONV 

(380) 

ABF-U 

ABL-U 

ABM-U 

ABN-U 

ABO-U 

ABP-U 

ABQ-U 

ABR-U 



ABS-U 

AGA-U 

AGB-U 

AGC-U 

AGD-U 

AGE-U 

AGG-U 

AGI-U 



AGJ-U 

AGK-U 

AGL-U 

AGM-U 

AGN-U 

AOA-U 

AOB-U 

AOC-U 



AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 

APA-U 

APB-U 

APD-U 



APE-U 

APF-U 

APG-U 

APH-U 

API-U 

APK-U 

APL-U 

RC6-M 



RC7-U 

RC8-M 

RC9-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

80N-U 



9BN-U 

9BO-U 

9GB-U 

9GC-U 

9GN-U 

9PA-U 



PPICOUNT 

(240) 

ABG-M 

ABH-M 

ABJ-M 

RBG-M 

RBH-M 

RBI-M 

RBJ-M 

RBK-M 



RBL-M 

RBM-M 

RBN-M 

REO-M 

RBP-M 

RDB-M 

RDC-M 

RDD-M 



RDE-M 

RDG-M 

RDP-M 

RDQ-M 

RDR-M 

RDS-M 

RDT-M 

ROA-U 



ROB-U 

ROC-U 

ROD-U 

ROE-U 

ROF-U 

ROG-U 

ROH-U 

ROI-U 



ROJ-U 

ROK-U 

RON-U 

ROR-U 

RPC-M 

RPE-U 

RPF-M 

RPG-U 



RPM-M 

8BN-M 

8BO-M 

80N-U 

8PM-M 




PPICPTRK 

(430) 

RCJ-M 

8CK-M 

8PA-U 

9GN-U 





PPIDCBIN 

(428) 

AGA-U 

AGI-U 

AGN-U 

APF-U 

RCK-U 

RC1-M 

9GN-U 


PPIDCBOU 

(42A) 

AGK-U 

APF-U 

APK-U 

RCK-U 

RC1-M 




PPIDDSRT 

(41C) 

AGA-U 

AGG-U 

AGH-U 

AGI-U 

AGJ-U 

AGK-U 

AGN-U 

APC-U 



APF-U 

APJ-U 

APK-U 

RC1-M 

RC4-U 

RPG-U 

9GN-U 


PPIDD0L1 

(298) 

AOA-U 

AOB-U 

AOC-U 

AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 



AOP-U 

AOQ-M 

RC1-M 






PPIDEB 

(330) 

ABC-U 

ADB-U 

ADC-U 

ADD-U 

ADE-U 

ADG-U 

ADH-U 

ADI-U 



ADJ-U 

ADP-U 

ADQ-U 

ADR-U 

ADS-U 

ADT-U 

ADU-U 

ADX-U 



AGA-U 

AGI-U 

AGN-U 

RBA-U 

RBB-U 

RBC-U 

RBE-U 

RBL-U 



RBM-U 

RBN-U 

RBO-U 

RBP-U 

RBY-U 

RBZ-U 

RGD-U 

RGE-U 



RGM-U 

ROA-U 

ROB-U 

ROC-U 

ROD-U 

ROE-U 

ROF-U 

ROG-U 



ROH-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

ROW-U 

ROX-U 

ROY-U 



ROZ-U 

8BN-U 

8BO-U 

8GC-U 

80N-U 

9DJ-U 

9GN-U 


PPIDEB2 

(360) 

ADL-U 

RGB-U 

RGC-U 

RGL-U 

8GB-U 




PPIDELCT 

(244) 

RBJ-M 

RBK-M 

RBW-M 

REX-M 

RDE-M 

RDR-M 

RDS-M 

ROA-U 



ROB-U 

ROC-U 

ROD-U 

ROE-U 

ROF-U 

ROG-U 

ROH-U 

ROI-U 



ROJ-U 

ROK-U 

RON-U 

80N-U 
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PPIDEPHQ 

(280) 

ABA-U 

ABT-U 

ABU-U 

AEV-U 

ABW-U 

ABX-U 

ABY-U 

ABZ-U 



AGA-M 

AGG-U 

AGI-U 

AGN-M 

AOI-M 

AOJ-M 

AOK-M 

AON-M 



AOR-M 

AOS-M 

APA-U 

ADP-U 

RBA-U 

RBT-U 

RBU-U 

RBV-U 



RBW-U 

RBX-U 

RBY-U 

REZ-U 

RGB-U 

ROI-U 

ROJ-U 

ROK-U 

PPIDEPHO 

(280) 

RON-M 

ROR-M 

ROS-M 

ROT-M 

RPA-U 

RPB-M 

RPD-U 

RPE-M 



8GB-U 

80N-M 

8PA-M 

90N-M 





PPIDEV 

(240) 

APB-M 

RCJ-M 

RCK-U 

RC1-M 

8CK-U 




PPIDEVCD 

(452) 

AGC-U 

AGE-U 

APB-U 

APE-U 

RC1-M 

8CK-U 

9GB-U 

9GC-U 



9PA-U 








PPIDIRAD 

(118) 

AGE-0 

RGC-U 

ROK-M 

ROT-M 

RPB-U 

RPE-U 



PPIDOOBA 

(2E4) 

RBL-M 

RBM-M 

RBN-M 

REO-M 

RBP-M 

ROP-M 

ROQ-U 

RPG-U 



8BN-U 

8BO-U 

9BN-M 

9EO-M 





PPIDOUO 

(2B4) 

API-M 

RBM-M 

RBO-M 

ROP-U 

ROQ-U 

8BO-M 



PPIDPTRK 

(42E) 

RCJ-M 

ROK-U 

ROT-U 






PPIDSKED 

(98) 

AGB-0 

AOI-M 

RCJ-0 

RC4-M 

ROK-U 

8CK-0 

80N-M 

8PM-0 

PPIENDAR 

(1A8) 

AGE-0 

AGH-0 

AOK-O 

AOT-O 

A01-0 

APJ-0 

RCJ-0 

ROK-M 



RPB-0 

RPC-O 

RPE-0 

RPF-0 

RPM-0 

8CK-U 

80N-0 

8PM-0 



9GC-0 

90N-0 







PPIEOF 

(388) 

AGA-U 

AGI-U 

AGN-U 

APF-U 

RCT-0 

RCV-M 

RC7-M 

RC8-M 



RGV-U 

9GN-U 







PPIFCF01 

(77) 

AOL“U 








PPIFFF 

(64) 

AOM-U 

RC1-M 







PPIFILSZ 

(25C) 

APB-U 

RCJ-U 

RCK-M 

RC1-M 

RPC-M 

RPF-M 

RPG-U 

RPM-M 



8CK-U 

8PM-M 







PPIFSEON 

(23B) 

RPC-U 

RPM-U 

8PM-U 






PPIFTTAB 

(43C) 

APB-M 

RC1-M 

RPB-U 

RPE-U 





PPIGETMN 

(30C) 

ADE-U 

ADG-U 

ADS-U 

ADT-U 

APC-U 

APG-M 

APH-M 

API-M 



APL-M 

RCT-U 

RCV-U 

RPA-U 

RPB-U 

RPD-U 

RPE-U 

RPG-U 



8 PA-0 

9DJ-U 







PPIGETSZ 

(310) 

APG-M 

APH-M 

API-M 

APL-M 

RCT-U 

RCV-U 

RPA-U 

RPB-U 



RPD-U 

RPE-U 

RPG-U 

fiPA-U 





PPIINSCT 

(248) 

RDE-M 

RDR-M 

RDS-M 

ROA-U 

ROB-U 

ROC-U 

ROD-U 

ROE-U 



ROF-U 

ROG-U 

ROH-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

80N-U 

PPIINT 

(378) 

AOW-U 

AOX-U 

AOY-U 

AOZ-U 

RON-U 

80N-U 



PPIIPBLK 

(58) 

RCK-U 

RC1-M 







PPIJOBNM 

(430) 

RCV-U 

RCZ-M 

RC1-M 






PPILABOI 

(C8) 

AGB-M 

AGC-M 

AGD-M 

AGE-M 

AGM-M 

AOT-O 

A05-M 

ROT-0 



RPB-M 

RPE-M 







PPILAB02 

(2D4) 

ADB-U 

ADC-U 

ADD-U 

ACE-U 

ADG-U 

ADP-U 

ADq-U 

ADR-U 



ADS-U 

ADT-U 

AGA-U 

AGB-U 

AGC-U 

AGD-M 

AGE-M 

AGF-U 



AGI-U 

AGL-M 

AGM-M 

AGN-U 

APF-U 

APG-M 

APH-M 

API-M 



APL-M 

RCT-U 

RGD-M 

RGE-M 

RGM-M 

8GC-M 

9GC-M 

9GN-U 

PPILAB03 

(2AC) 

ADB-U 

ADC-U 

ADD-U 

ADE-U 

ADG-U 

ADH-U 

ADL-U 

ADP-U 



ADQ-U 

ADR-U 

ADS-U 

ADT-U 

AGA-U 

AGB-M 

AGC-M 

AGD-M 



AGE-M 

AGF-U 

AGI-U 

AGL-M 

AGM-M 

AGN-U 

APF-U 

APG-M 



APH-M 

API-M 

APL-M 

RCK-U 

RCT-U 

RC1-M 

RGB-U 

RGC-U 



RGD-U 

RGE-U 

RGL-U 

RGM-U 

8GC-U 

9GC-U 

9GN-U 


PPILAB04 

(2D8) 

ABA-U 

ABB-U 

ABC-U 

AEE-U 

ABG-U 

AGH-U 

ABI-U 

ABJ-U 



ABK-U 

ABL-U 

ABM-U 

ABN-U 

ABO-U 

ABP-U 

ABT-U 

ABU-U 



ABV-U 

ABW-U 

ABX-U 

AEY-U 

ABZ-U 

AGK-U 

APA-U 

APB-U 



APD-U 

APE-U 

APF-U 

APG-M 

APH-M 

API-M 

APK-U 

APL-M 



RPA-U 

RPB-U 

RPD-U 

RPE-U 

RPG-U 

RPV-U 

8PA-U 

9BN-U 



9B0-U 

9PA-U 







PPILAB05 

(2DC) 

ABL-U 

ABM-U 

ABN-U 

ABO-U 

ABP-U 

APA-U 

APB-U 

APD-U 



APE-U 

APG-M 

APH-M 

API-M 

APL-M 

RPA-M 

RPB-M 

RPD-M 



RPE-M 

RPG-0 

8PA-M 

9EN-U 

9BO-U 

9PA-U 



PPILAB06 

(2E0) 

AGA-U 

AGI-U 

AGK-U 

AGN-U 

APF-U 

APG-M 

API-M 

APK-U 



APL-M 

RPG-U 

9GN-U 
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PPILAE07 

(2B0) 

ABA-U 

ABB-U 

ABC-U 

ABE-U 

ABG-U 

ABH-U 

ABI-U 

ABJ-U 



ABK-U 

ABT-U 

ABU-U 

ABV-U 

ABK-U 

ABX-U 

ABY-U 

ABZ-U 



ADL-U 

AGB-U 

AGK-U 

APA-U 

APB-U 

APD-U 

APE-U 

APF-U 



APG-M 

APH-M 

API-M 

APK-U 

APL-M 

RBA-U 

RBE-U 

RBI-U 



RBK-U 

RBV-U 

RBX-U 

RCJ-U 

RCK-M 

RC1-M 

RGB-U 

RPA-M 



RPB-M 

RPD-M 

RPE-M 

RPG-M 

8GB-U 

8PA-M 

9GB-U 

9PA-U 

PPILAB08 

(2E4) 

ADB-U 

ADC-U 

ADD-U 

ADE-U 

ADG-U 

ADP-U 

ADQ-U 

ADR-U 



ADS-U 

ADT-U 

APG-M 

APL-M 

RDP-U 

RDQ-U 

RDR-U 

RDS-U 



RDT-U 








PPILAB09 

(2B4) 

APD-U 

API-U 

APL-U 

RCK-M 

RC1-M 




PPILAB10 

(308) 

AGB-U 

APL-M 

9GB-U 






PPILEXFD 

(2A4) 

AOB-U 

AOD-U 

AOF-U 

AOH-U 

AOM-M 

AOQ-U 



PPILEXFF 

(2A5) 

ABF-U 

ADB-U 

ADC-U 

ADD-U 

ADE-U 

ADG-U 

ADP-U 

ADQ-U 



ADR-U 

ADS-U 

ADT-U 

AOB-U 

AOD-U 

AOF-U 

AOH-U 

AOM-N 



AOQ-U 

RBA-U 

RBE-U 






PPILINK 

(23C) 

RCZ-U 

RC1-M 

RC6-U 

RC7-U 

RC8-U 




PPIMODEX 

(238) 

ABQ-U 

ABR-U 

ABS-U 

ADD-U 

ADE-U 

ADG-U 

ADR-U 

ADS-U 



ADT-U 

AGA-U 

AGG-U 

AGI-U 

AGJ-U 

AGK-U 

AGN-U 

AOB-U 



AOD-U 

AOF-U 

AOH-U 

APA-U 

APB-U 

APC-U 

APF-U 

APG-U 



APH-U 

API-U 

APK-U 

APL-U 

RCH-M 

RCK-U 

RC1-M 

RC6-U 



RC7-U 

RC8-U 

RON-U 

RPC-U 

RPF-U 

RPG-U 

RPM-U 

8CK-U 



8PM-U 

9GN-U 

9PA-U 






PPIMOVEQ 

(458) 

ABS-M 

RDC-U 

RDD-U 

RDQ-U 

RDR-U 




PPIMRGAL 

(294) 

ADU-M 

AOI-U 

AOJ-M 

AOQ-U 

AOR-U 

A02-U 

APH-U 

RCK-K 



RC1-M 

ROI-U 

ROR-M 

ROT-U 





PPIMRGMX 

(292) 

ADH-U 

ADI-U 

adj-m 

ADL-U 

ADR-U 

ADS-U 

ADU-N 

ADX-U 



AGA-U 

AGB-U 

AGD-U 

AGE-M 

AGF-U 

AGL-U 

AGK-U 

AGN-U 



AOI-U 

AOJ-U 

AON-U 

AOQ-U 

AOR-U 

AOS-M 

AOT-K 

A02-U 



APF-U 

APH-U 

API-U 

AOK-U 

APL-U 

RCJ-U 

RCK-K 

RCL-M 



RCT-U 

RC1-M 

RDL-U 

RGB-U 

RGC-U 

RGL-U 

ROI-K 

ROK-U 



RON-M 

ROP-U 

ROQ-U 

ROR-M 

ROS-M 

ROT-M 

RPC-U 

8GB-U 



8GC-U 

80N-M 

9DJ-M 

9GB-U 

9GC-U 

90N-U 



PPIMRGOP 

(296) 

ADL-U 

AGC-U 

AGJ-U 

AOQ-U 

AOR-M 

APH-M 

ROK-K 

ROT-N 



90N-M 








PPIMXCOL 

(450) 

RC1-M 

RDE-U 

RDG-U 

RDS-U 

RDT-U 

ROP-U 

ROQ-U 


PPINDSKA 

(2A8) 

AGE-U 

AGI-U 

AGJ-U 

AGK-U 

AOK-U 

AOT-U 

AOI-U 

APB-U 



APE-U 

APH-U 

RCJ-U 

RCK-U 

RCT-U 

RC1-K 

RC4-U 

ROK-U 



ROT-U 

RPB-U 

RPC-U 

RPE-U 

RPF-U 

RPG-U 

8CK-U 

80N-U 



8PM-U 

9GN-U 

90N-U 






PPINET 

(338) 

AOA-U 

AOB-U 

AOC-U 

AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 



AOP-U 

AOQ-U 

AOW-U 

AOX-U 

AOX-U 

AOZ-U 

RDB-U 

RDC-U 



RDD-U 

RDE-U 

RDG-U 

RDH-U 

RDI-U 

RDJ-U 

RDP-U 

RDQ-U 



RDR-U 

RDS-U 

RDT-U 

RDU-U 

RDX-U 

RGD-U 

RGE-U 

RGF-U 



RGM-U 

ROJ-U 

ROW-U 

ROX-U 

ROY-U 

ROZ-U 

RPA-U 

RPB-U 



RPG-U 

8DJ-U 

8GC-U 

8PA-U 





PPINETAR 

(438) 

ADH-M 

ADI-M 

ADJ-M 

ADL-M 

ADU-M 

ADX-K 

AGE-M 

RDL-U 



RGC-U 

ROP-U 

ROQ-U 

ROT-U 

9DJ-M 




PPINETM 

(368) 

AOP-U 

AOQ-U 

RBG-U 

REH-U 

RBI-U 

RBJ-U 

RBK-U 

RBT-U 



RBU-U 

RBV-U 

RBW-U 

REX-U 

RDL-U 

RGB-U 

RGC-U 

RGL-U 



8GB-U 








PPINUMCF 

(70) 

AOL-U 

AOM-U 

A05-U 

RCZ-U 

RC1-M 




PPIODOM 

(120) 

AON-O 

RON -O 







PPIOPBAD 

(454) 

ABG-M 

ABH-M 

ABJ-M 

AET-M 

ABU-N 

ABW-K 

RBG-M 

RBH-K 



RBI-M 

RBJ-M 

RBK-M 

RET-M 

RBU-M 

RBV-K 

RBW-M 

RBX-M 



ROP-U 

ROQ-U 







PPIOPBLK 

(272) 

AGK-U 

APF-U 

APK-U 

RC1-M 





PPIOPEN 

(3B0) 

AGA-U 

AGB-U 

AGC-U 

AGD-U 

AGE-U 

AGG-U 

AGH-U 

AGI-U 



AGJ-U 

AGK-U 

AGL-U 

AGM-U 

AGN-U 

APA-U 

APB-U 

APC-U 



APD-U 

APE-U 

APJ-U 

APK-U 

RCT-0 

RPA-U 

9GB-U 

9GC-U 



9GN-U 

9PA-U 
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PPIPBUFF 

(68) 

AOM-U 

RC1-M 







PPIPCF01 

(72) 

AOL-O 

AOM-O 







PPIPDWA 

(48) 

ADH-0 

ADI-0 

ADJ-0 

ADU-0 

ADX-0 

RD1-0 

ROK-M 

ROP-U 



RPQ-U 

9DJ-0 







PPIPGCSZ 

(60) 

RCB-U 

RCK-U 

RC1-M 






PPIPSVA 

(88) 

ABQ-M 

ABR-M 

ABS-M 

ADJ-M 

AGB-M 

AGI-M 

APC-M 

API-M 



RGB-0 

RGD-O 

RGF-U 

RGL-0 

RGM-0 

8GB-0 

8GC-0 

9DJ-M 

PPIP1ASZ 

(4C) 

RC1-M 








PPIP1GC 

(48) 

APG-U 

APL-U 

RCK-M 

RC1-M 





PPIP2GC 

(2B8) 

APH-U 

RCK-M 

RC1-M 






PPIP3ASZ 

(2C0) 

RCV-U 

RC1-M 







PPIP3GC 

(2BC) 

API-U 

RCK-M 

RC1-M 






PPIRCDCT 

(24C) 

ADH-U 

ADI-I 

AGD-U 

AGH-U 

AGM-U 

APK-U 

RPC-M 

RPF-M 



RPG-U 

RPM-M 

8PM-M 

9GC-U 





PPIRCDL1 

(288) 

ADB-U 

ADP-U 

AGA-U 

AGI-U 

AGN-U 

APF-U 

APG-U 

API-U 



APL-U 

RCK-U 

RC1-M 

RDE-U 

RDS-U 

9GN-U 



PPIRCLD2 

(28A) 

ABB-U 

ABC-U 

ABG-U 

AEH-U 

ABJ-U 

ABR-U 

ABS-U 

ABT-U 



ABU-U 

ABW-U 

ABY-U 

AEZ-U 

ADH-U 

ADI-U 

ADX-U 

AGD-U 



AGE-U 

AGM-U 

APB-U 

APE-U 

RBB-U 

RBC-U 

RBG-U 

RBH-U 



RBJ-U 

RBT-U 

RBU-U 

REW-U 

RBY-U 

RBZ-U 

RCJ-U 

RCK-U 



RC6-U 

RDE-U 

RDG-U 

RDH-U 

RDL-U 

RDS-U 

RDT-U 

RDX-U 



RGB-U 

RGC-U 

RGE-U 

RGL-U 

RGM-U 

8CK-U 

8GB-U 

8GC-U 

PPIRCDL3 

(28C) 

ABL-U 

ABQ-U 

AGK-U 

APF-U 

API-U 

APK-U 

RCK-U 

RC8-U 

PPIRCDL4 

(28E) 

RCJ-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

ROR-U 

RPE-U 

80N-U 

PPIRCDL5 

(290) 

APG-U 

RCJ-U 

RCK-U 

ROS-U 

8CK-U 




PPIRCV 


AGA-U 

AGB-U 

AGD-U 

AGE-M 

AGF-U 

AGH-U 

AGI-U 

AGK-U 



AGM-M 

AGN-U 

AOM-U 

APC-U 

APF-U 

APJ-U 

APK-U 

RCV-M 



RC9-U 

RGB-M 

RGC-M 

RGD-M 

RGE-M 

RGL-M 

RGM-M 

ROA-U 



ROB-U 

ROC-U 

ROD-U 

ROE-U 

ROF-U 

ROG-U 

ROH-U 

ROI-U 



ROJ-U 

ROK-U 

RON-U 

ROR-U 

ROS-U 

RPA-M 

RPB-M 

RED-M 



RPE-& 

RPG-U 

8GB-M 

8GC-M 

8PA-M 

8PM-U 

9GN-U 

9PA-U 

PPIRD 

(358) 

AGB-U 

AGC-U 

AGD-U 

AGE-U 

AGL-U 

AGK-U 

RBG-U 

RBH-U 



RBI-U 

RBJ-U 

RBK-U 

RBT-U 

RBU-U 

RBV-U 

RBW-U 

RBX-U 



RCV-U 

RDH-U 

RDI-U 

RDX-U 

RON-U 

ROR-U 

ROS-U 

ROT-U 



80N-U 

9BG-U 

9GC-U 






PPIRECFM 

(276) 

AGK-U 

APF-U 

APK-U 

RC1-M 





PPIRMA 

(390) 

AGA-U 

AGI-U 

AGN-U 

AOJ-U 

RDD-U 

RDE-U 

RDG-U 

RDR-U 



RDS-U 

RDT-U 

RGV-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

RPC-U 



80N-U 

9GN-U 







PPIRMB 

(398) 

RBJ-U 

RBK-U 

RBW-U 

REX-U 

ROP-U 

ROQ-U 

ROR-U 

ROS-U 



RPE-U 

RPF-U 

RPM-U 

8PM-U 





PPIRMC 

(398) 

RBM-U 

RBO-U 

RDU-U 

RGV-U 

ROP-U 

ROQ-U 

RPG-U 

RPV-U 



8BO-U 








PPIRPLDP 

(45C) 

AGA-M 

AGI-M 

AGK-M 

AGN-M 

APF-M 

APK-M 

RBN-U 

RBO-U 



RGV-U 

RPG-U 

RPV-U 

9GN-M 





PPISBLCT 

(2FC) 

ADH-U 

ADI-U 

ADX-U 

AGB-M 

AGC-M 

AGD-K 

AGE-M 

AGL-M 



AGM-M 

RBG-U 

RBH-U 

REI-U 

RBJ-U 

RBK-U 

RBT-U 

RBU-U 



RBV-U 

RBW-U 

RBX-U 

RDH-U 

RDI-U 

RDL-U 

RDX-U 

RGB-U 



RGC-U 

RGD-U 

RGE-U 

RGL-U 

RGM-U 

8GB-U 

8GC-U 

9GB-M 



9GC-M 








PPISEQCT 

(250) 

AGE-0 

AGK-0 

AOR-M 

AOT-O 

APH-0 

ROI-M 

ROK-O 

ROR-M 



ROT-0 








PPISESDS 


AGK-U 

APF-U 

APK-U 






PPISIRG 

(264) 

RC1-M 

RPA-U 







PPISKPRD 

(50) 

APC-U 

RC1-M 







PPISKSDS 


AGK-U 

APF-U 

APK-U 






PPISLIB 

(31C) 

RCV-U 

RCZ-M 

RC6-U 

RC7-U 

RC8-U 

RC9-U 



PPISORCE 

(314) 

RCZ-M 

RC1-M 

RC9-U 
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PPISPGN1 

(2D0) 

ABQ-M 

ABR-M 

ABS-M 

AET-M 

ABU-M 

ABV-M 

ABW-M 

ABX-M 



ADH-M 

ADI-M 

ADJ-M 

ABL-M 

ADU-M 

ADX-M 

AGA-M 

AGB-M 



AGC-M 

AGD-M 

AGE-M 

AGG-M 

AGI-M 

AGJ-M 

AGK-M 

AGL-M 



AGM-M 

AGN-M 

AOA-M 

AOB-M 

AOC-M 

AOD-K 

AOE-M 

AOF-M 



AOG-M 

AOH-M 

AON-M 

AOQ-M 

APA-M 

APB-M 

APD^M 

APE-M 



APF-M 

APG-M 

APH-M 

API-M 

APK-M 

APL-M 

RCT-U 

9DJ-M 



9GB-M 

9GC-M 

9GN-M 

90N-M 

9PA-M 




PPISRALG 

(264) 

AGE-U 

AGI-M 

AGJ-M 

AGK-M 

RGC-U 

RGE-U 

ROT-M 

RPB-U 



RPE-M 

8GB-U 

8GC-U 

8PA-U 

9GN-M 




PPISRTEL 

(270) 

ABB-U 

ABC-U 

ABG-U 

ABH-U 

ABJ-U 

ABT-U 

ABU-U 

ABW-U 



ABY-U 

ABZ-U 

ADH-U 

ADL-U 

AGD-U 

AGE-U 

AGM-U 

APB-U 



APE-U 

APG-U 

RBB-U 

RBC-U 

RBG-U 

RBH-U 

RBJ-U 

RBT-U 



RBO-U 

RBW-U 

RBY-U 

REZ-U 

RCJ-U 

RCK-M 

RC1-M 

RGB-U 



RGD-U 

RGL-U 

RGM-U 

ROI-U 

ROJ-U 

ROK-U 

RON-U 

ROR-U 



ROS-U 

RPB-U 

RPE-U 

8GB-U 

8GC-U 

80N-U 

9GC-U 


PPISRTG 

(26C) 

AOA-U 

AOB-U 

AOC-U 

AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH-U 



APG-M 

APL-M 

RCJ-U 

RCK-M 

RC1-M 

ROI-U 

ROJ-U 

ROK-U 



ROW-U 

ROX-U 

ROY-U 

ROZ-U 





PPISTAR 

(120) 

AGI-0 

AGJ-0 

AGK-0 

AOK-O 

AOT-O 

A01-0 

APB-0 

APE-0 



RCJ-0 

8CK-0 

9GN-0 

90N-0 





PPISTDCB 

(2F8) 

ABL-U 

ABM-U 

ABN-U 

AEO-U 

ABP-U 

ADB-U 

ADC-U 

ADD-U 



ADE-U 

ADG-U 

ADJ-U 

ADP-U 

ADQ-U 

ADR-U 

ADS-U 

ADT-U 



AGA-M 

AGB-U 

AGD-U 

AGE-U 

AGF-U 

AGG-M 

AGH-U 

AGI-M 



AGJ-M 

AGK-M 

AGL-U 

AGM-U 

AGN-M 

APA-U 

APB-U 

APC-U 



APD-U 

APE-U 

APF-M 

APJ-U 

APK-M 

RCT-U 

RGB-U 

RGC-U 



RGD-U 

RGL-U 

RGM-U 

RON-U 

ROS-U 

RPA-U 

RPB-U 

RPC-U 



RPD-U 

RPE-U 

RPF-U 

RPG-U 

RPM-U 

8GB-U 

8GC-U 

8PA-U 



8PM-U 

9BN-U 

9BO-U 

9DJ-U 

9GB-U 

9GC-U 

9GN-M 


PPISTIOB 

(300) 

AGA-M 

AGC-U 

AGE-U 

AGI-M 

AGJ-M 

AGK-M 

APB-U 

APD-U 



APE-U 

RGC-U 

RGE-U 

RPB-U 

RPE-U 

8GC-U 

9GC-U 

9GN-M 



9PA-U 








PPISTPNM 

(448) 

RCV-U 

RCZ-M 







PPISVARE 

(0) 

AGD-M 

AGM-M 







PPISVSIN 


AGA-U 

AGF-U 

AGI-U 

AGN-U 

APC-U 

APF-U 

APG-U 

APL-U 



RCT-U 

RC6-U 

RC8-U 

RGF-U 

9GN-U 




PPISVSOP 


AGK-U 

APF-U 

APK-U 

REN-U 

RBO-U 

RCT-U 

RC8-U 

RPG-U 

PPISWt 

(230) 

ABA-U 

ABB-U 

ABC-U 

ABE-U 

ABF-U 

ABG-U 

ABH-U 

ABI-U 



ABJ-U 

ABK-U 

ABL-U 

AEM-U 

ABN-U 

ABO-U 

ABP-U 

ABQ-U 



ABR-U 

ABS-U 

ABT-U 

ABU-U 

ABV-U 

ABW-U 

ABX-U 

ABY-U 



ABZ-U 

ADH-U 

ADI -U 

ADJ-M 

ADL-U 

ADP-M 

ADQ-M 

ADR-M 



ADS-M 

ADT-M 

ADU-M 

AGA-U 

AGB-M 

AGC-M 

AGD-M 

AGE-M 



AGG-U 

AGH-U 

AGI-U 

AGJ-U 

AGK-U 

AGL-M 

AGM-M 

AGN-U 



AOA-U 

AOB-U 

AOC-U 

AOD-U 

AOE-U 

AOF-U 

AOG-U 

AOH U 



AOL-U 

AON-U 

AOP-U 

AOQ-U 

AOR-M 

AOS-M 

AOT-U 

AOI-U 



A02-U 

APA-U 

APB-M 

APC-U 

APD-U 

APE-U 

APF-U 

APG-M 



APH-M 

API-M 

APJ-U 

APK-D 

APL-M 

RBM-M 

RBO-U 

RCB-U 



RCH-M 

RCJ-U 

RCK-M 

RCT-U 

RCV-M 

RCZ-M 

RC1-M 

RC4-U 



RC6-U 

RC7-U 

RC8-M 

RC9-U 

RDD-M 

RDE-M 

RDL-U 

RDP-M 



RDQ-M 

RDR-M 

RDS-M 

RDT-M 

RDU-U 

RGB-M 

RGC-M 

RGD-M 



RGE-M 

RGF-U 

RGL-M 

RGM-M 

RGV-U 

ROI-M 

ROJ-M 

ROK-U 



RON-M 

ROP-U 

ROQ-U 

ROR-M 

ROS-M 

ROT-M 

ROW-U 

ROY-U 



RPA-M 

RPB-M 

RPC-M 

RPD-M 

RPE-M 

RPF-M 

RPG-U 

RPM-K 



8BO-U 

8CK-U 

9GB-M 

8GC-M 

80N-M 

8PA-M 

8PM-M 

9BN-U 



9BO-U 

9DJ-M 

9GB-M 

9GC-M 

9GN-U 

9PA-U 



PPISW14 


AGC-U 

AGE-U 

AGI-U 

AGJ-U 

AGK-U 

APB-U 

APE-U 

RGC-U 



RGE-U 

RPB-U 

RPE-U 

8GB-U 

8GC-U 

9GB-U 

9GC-U 

9GN-U 


9PA-U 
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PPISW2 

(23B) 

ABS-U 

AGA-U 

AGF-U 

AGI-U 

AGK-U 

AGN-U 

AOM-U 

A05-U 



APC-U 

APF-U 

APG-U 

APK-U 

APL-U 

RBL-U 

RBM-U 

RBN-U 



RBO-U 

RBP-U 

RCB-U 

RCK-U 

RCT-U 

RCZ-M 

RC1-M 

RC6-U 



RC8-U 

RDB-U 

RDC-U 

RDD-U 

RDE-U 

RDG-U 

RDI-U 

RDP-U 



RDQ-U 

RDR-U 

RDS-U 

RDT-U 

RGF-U 

RPC-U 

RPG-U 

RPM-U 



8 BN-U 

8 BO-U 

8 PM-U 

9GN-U 





PPITAVLC 

(2C8) 

APG-U 

APL-U 

RCK-M 

RC1-M 





PPITPCYL 

(42C) 

AGC-U 

AGE-U 

AOK-U 

APB-U 

APE-U 

RCJ-K 

ROT-U 

8 CK-M 



90N-U 








PPITPPT 

(F4) 

AOR-M 

A02-U 

APK-U 

RC4-M 

ROI-M 




PPITPTBL 

(F8) 

AGA-0 

AGB-0 

AGD-0 

AGG-0 

AGH-0 

AGI-0 

AGM-0 

AGN-0 



AOI-O 

AOJ-O 

AON-O 

AOR-O 

AOS-O 

A02-0 

APJ-0 

APK-0 



RGB-0 

RGL-0 

ROI-O 

ROJ-M 

RON-O 

RPC-0 

PPF-0 

RPM-U 

PPIUNTCT 

(304) 

ABT-M 

ABU-M 

ABV-M 

ABW-M 

ABX-M 

RBA-U 

RBT-U 

RBU-U 



REV-U 

RBW-U 

RBX-U 

REY-U 

RBZ-U 

RON-U 

80N-U 


PPIVMV 

(350) 

ABF-U 








PPIVSI 

(464) 

RC6-M 








PPIVSMSG 

(460) 

AGA-M 

AGI-M 

AGK-M 

AGN-M 

APF-M 

APK-M 

RCT-U 

RGV-U 



RPV-U 

9GN-M 







PPIVSMSL 

(45E) 

AGA-M 

AGI-M 

AGK-M 

AGN-M 

APF-M 

APK-N 

RCT-M 

RGV-U 



RPV-U 

9GN-M 







PPIWKARE 

(48) 

ABF-M 

AGD-0 

AGF-M 

AGL-0 

AGM-0 

AOI-M 

APB-0 

APE-0 



RCT-U 

RCV-M 

RGB-M 

RGC-M 

RGD-M 

RGE-M 

PGL-M 

RGM-M 



RGV-M 

ROI-M 

ROJ-M 

ROK-M 

RON-M 

ROR-M 

ROS-M 

ROT-M 



RPB-M 

RPC-M 

RPE-M 

RPF-M 

RPG-M 

RPM-M 

RPV-F 

8 GB-K 



80N-M 

8 PA-M 

8 PM-M 

9GC-0 





PPIWRT 

(348) 

ABC-U 

APA-U 

APB-U 

APD-U 

APE-U 

RBA-U 

RBB-U 

RBC-U 



RBE-U 

RBG-U 

RBH-U 

REI-U 

RBJ-U 

RBK-U 

RBL-U 

RBM-U 



RBN-U 

RBO-U 

RBP-U 

RBT-U 

RBU-U 

RBV-U 

RBW-U 

PBX-U 



RBY-U 

RBZ-U 

RC9-U 

ROI-U 

ROK-U 

ROR-U 

ROT-U 

8 BN-U 



8 BO-U 

80N-U 

9PA-U 






PPIXCAP 

(268) 

APD-U 

ADQ-U 

ADR-U 

ADS-U 

ADT-U 

AON-U 

RCJ-K 

RC1-K 



RDD-U 

RDE-U 

RDP-M 

RDQ-M 

RDR-M 

RDS-M 

RDT-M 

ROK-K 



RON-M 

RPA-M 

RPB-M 

8 PA-M 





PPIX11 

(3B8) 

APG-U 

APL-U 

EX 1-0 

RC6-M 

RC7-0 

RC9-0 



PPIX15 

(3C8) 

ADD-M 

ADE-M 

ADR-M 

ADS-M 

ADU-N 

RC6-0 

RC8-M 

RDD-U 



RDE-U 

RDR-U 

RDS-U 

RDU-U 





PPIX16 

(410) 

RCT-0 

RC6-M 

RDD-U 

RDE-U 

RDP-U 

RDS-U 



PPIX17 

(3D8) 

RC6-0 

RPC-U 

RPM-U 

8 PM-U 





PPIX18 

(3e8) 

AGA-U 

AGI-U 

AGN-U 

RC6-0 

9GN-U 




PPIX19 

(3F8) 

AGA-U 

AGI-U 

AGN-U 

RC6-0 

9GN-U 




PPIX21 

(3C0) 

APH-U 

APL-U 

EX 2-0 

RC7-M 





PPIX25 

(3D0) 

RBJ-U 

RBK-U 

RBW-U 

REX-U 

RC7-0 




PPIX27 

(3E0) 

RC7-0 

RPF-U 

RPM-U 

8 PM-U 





PPIX28 

(3F0) 

AGG-U 

AGJ-U 

AGN-U 

RC7-0 

9GN-U 




PPIX29 

(400) 

AGG-U 

AGJ-U 

AGN-U 

RC7-0 

9GN-U 




PPIX31 

(3C0) 

API-U 

EX3-0 

RC8-M 






PPIX35 

(3D0) 

ABM-M 

ABO-M 

RBM-U 

REO-U 

RC8-0 

8 BO-U 

9BO-M 


PPIX37 

(3E0) 

RC8-0 

RPG-U 







PPIX38 

(3F0) 

AGK-U 

APF-U 

APK-U 

RC8-0 





PPIX39 

(400) 

AGK-U 

APF-U 

APK-U 

RC8-0 





PPIX61 

(408) 

AOB-U 

AOD-U 

AOF-U 

AOH-U 

AOQ-U 

RC6-0 

RC7-0 

RC8-0 
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COMMON CROSS-REFERENCE TABLE (BLOCKSET 


The following table contains the names of COMMON fields together 
with their displacements. 


PjsjL.- 

Name 

Defini 

ition 

Description 

OOEC 

COMABEND 

DS 

C 

ABDUMP DD ENCOUNTERED 

0388 

COMACE 

DS 

F 

ABNORNAL CHANNEL END 

05FD 

COMALTAB 

DS 

CL256 


0250 

COMAREAQ 

DS 

F 

WORK AREA PREFERENCE QUEUE 

01A8 

COMARECS 

DS 

F 

ADDED REC COUNT 

0142 

COMARKER 

DS 

C 

CONTROL CARD ERROR POSITION FLAG 

01E4 

COMAVAIL 

DS 

F 

ADDRESS OF AVAILABLE COMMON 

0830 

COMAVGLN 

DS 

F 

AVERAGE RECORD LENGTH VALUE 

0198 

COMAXIO 

DS 

H 

MAXIMUM SORTIO BUF TRANSFER COUNT 

03A4 

COMAXKPB 

DS 

H 

MAXIMUM KEYS PER BLOCK 

0118 

COMAXLIM 

DS 

F 

MAX FOR SI2E=MAX 

090C 

COMBACK 

DS 

F 

BACKOUT RECORD'S PREDECESSOR 

0254 

COMBINFQ 

DS 

F 

QUEUE OF AVAILABLE RECORD BINS 

01C0 

COMBINSN 

DS 

F 

SELECTED BIN RECORD COUNT 

0264 

COMBINSQ 

DS 

F 

SELECTED BIN QUEUE 

0268 

COMBIMST 

DS 

F 

SELECTED QUEUE TAIL 

02AC 

COMBINS2 

DS 

F 

SI2E OF A RECORD BIN 

082A 

COMBLKS 

DS 

C 

N=BYPASS FLR BLOCKSET 

020C 

COMBLKSI 

DS 

F 

WORKFILE BLOCK SI2E 

041C 

COMBLOKI 

DS 

F 

INPUT BLOCK COUNTER 

0418 

COMBLOKO 

DS 

F 

OUTPUT BLOCK COUNTER 

0390 

COMBOUND 

DS 

F 

COUNT OF WITHIN BOUND RECORDS 

03B4 

COMBVCTR 

DS 

H 

HIGH BV XFER COUNT 

0374 

COMBVD 

DS 

F 

CURRENT BVD 

027C 

COMBVDAQ 

DS 

F 

ALLOCATED BVD COUNT 

0278 

COMBVDFQ 

DS 

F 

FREE BVD QUEUE 

0284 

COMBVDHI 

DS 

F 

ADDRESS OF HIGH BOUNDARY VALUE DEF 

0280 

COMBVDLO 

DS 

F 

ADDRESS OF LOW BOUNDARY VALUE DEF 

03B6 

COMBVLIM 

DS 

H 

HIGH BV XFER LIMIT 

0080 

C0MB37R 

EQU 

X'80 ' 

B37 INFO MESSAGE FLAG MASK 

0274 

COMCADAQ 

DS 

F 

AVAILABLE CYLINDER AREA QUEUE 

0270 

COMCADFQ 

DS 

F 

FREE CAD QUEUE 

02CC 

COMCCHH 

DS 

F 

LATEST SORTIO CCHH 

08EC 

COMCENT 

DS 

F 

PER CENT RSA UTILI2ATION 

081D 

COMCHALT 

DS 

Cll 

A=TRANSLATE AQ ONLY 

C=TRANSLATE CH AND AQ 

081E 

COMCHECK 

DS 

CL1 

Y=RECORD COUNTERS CHECKED 

N=RECORD COUNTERS NOT CHECKED 

0484 

COMCLOSE 

DS 

OF 

CLOSE LIST AREA 

082B 

COMCNTL 

DS 

C 

X' 00'=SORTCNTL NOT PRESENT 

OOE8 

COMCOBIN 

DS 

C 

COBOL INPUT MODE OPTION 

00E9 

COMCOBUT 

DS 

C 

COBOL OUTPUT MODE OPTION 

0139 

COMCPRNT 

DS 

C 

COBOL SORT MESSAGE PRINT CLASS 

0130 

COMCSYSO 

DS 

CL8 

COBOL SYSOUT = A DDNAME 

03BO 

COMCYLNO 

DS 

H 

LOGICAL CYLINDER ASSIGNMENT CTR 

0SD4 

COMDELTA 

DS 

F 

RESIDUE DELTA 

0 0F8 

COMDIAGS 

DS 

F 

DIAGNOSTIC LIST ADDRESS 

01AC 

COMDRECS 

DS 

F 

DELETED REC COUNT 

0358 

COMDUBBL 

DS 

D 

DOUBLEWORD ALIGNED WORK AREA 

0248 

COMDXKEY 

DS 

F 

ADDRESS OF KEY AREA DXL 

023C 

COMDXLIO 

DS 

F 

SORTIO CIRCULAR LIST ENTRY 

0244 

COMDXIRQ 

DS 

F 

SORTWK DXL READ QUEUE 

0238 

COMDXLSQ 

DS 

F 

SEQUENTIAL* DXL LIST HEAD 

02B4 

C0MDXLS2 

DS 

F 

SI2E OF DXL (DEPENDS ON V OR R) 

0240 

COMDXIWQ 

DS 

F 

SORTWK DXL WRITE QUEUE 

024C 

CONDXSKY 

DS 

F 

SECONDARY KEY AREA DXL ADDRESS 

05F0 

COMDYNAM 

DS 

CL8 

DYNALLOC UNIT NAME 

0814 

COMDYNER 

DS 

F 

RETURN CODE FROM DYNALLOC 

05F8 

COMDYNUM 

DS 

CL8 

DYNALLOC COUNT 

092C 

COMECTRS 

DS 

10F 

EVENT COUNT SAVE AREA 

0128 

COMEMBRI 

DS 

CL8 

SYSOUT FILE NAME 
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Disc. 

Name 

Definition 

Descrintion 

0130 

COMEMBRO 

DS 

CL8 

COBOL SYSOUT=A DDNAME 

00F2 

COMEOF 

DS 

C 

END OF FILE ON S0RTIN INDICATOR 

00F1 

COMEOV 

DS 

C 

END OF VOLUME ON SORTIN INDICATOR 

02A4 

COMEQUAL 

DS 

F 

EQUAL COUNTER 

0484 

COMERGEI 

DS 

28 F 


04F4 

COMERGES 

DS 

48F 


0920 

COMESAVE 

DS 

3F 

EVENT COUNT SAVE AREA 

02A8 

COMEXITS 

DS 

F 

EXIT LIST HEAD 

0960 

COMEXTRA 

DS 

2F 

UNUSED WORDS 

0 0E4 

COMFAULT 

DS 

OF 


0968 

COMFEND 

DS 

0D 

END OF FOUNDATION 

01D4 

COMFILEG 

DS 

F 

GET FILE AREA PTR 

01D8 

COMFILEP 

DS 

F 

PUT FILE AREA PTR 

019C 

COMFILE2 

DS 

F 

FILE SIZE 

0010 

COMFLAG 

EQU 

16 

TRACE INPUT BLOCKS 

08D0 

COMFLOOR 

DS 

F 

PAGE SIZE COMPLEMENT 

O0E4 

COMFOUND 

DS 

OF 


01BC 

COMFREEB 

DS 

F 

FREE BIN COUNT 

08E8 

COMFSTOR 

DS 

F 

FIXED RESTORE ROUTINE ADDRESS 

0420 

COMHASH 

DS 

F 

SUM OF OUTPUT COUNT IDS 

0145 

COMIBEND 

D5 

C 

ABEND IF ERROR DURING INITIAL PHASE 

0192 

COMIBLKL 

DS 

H 

INPUT FILE AVERAGE BLOCK LENGTH 

018A 

COMIBLKZ 

DS 

H 

INPUT BLOCKSIZE 

036C 

COMIDKEY 

DS 

F 

MIDDLE KEY 

0484 

COMIDSNM 

EQU 

COMCLOSE 

INPUT DATA SET NAME 

0146 

COMIDUMP 

DS 

C 

DUMP OPTION FOR IBEND 

0188 

COMIFORM 

DS 

C 

INPUT REDFM 

0380 

COMIIOB 

DS 

F 

INPUT IOB 

01F4 

COMINCOR 

DS 

F 

MINIMUM SPACE NEEDED TO SORT 

0154 

COMINDCB 

DS 

F 

SORTIN DCB ADDRESS 

0918 

COMINFIL 

DS 

F 

SORTIN BYTE COUNT 

01F0 

COMINGET 

DS 

F 

MINIMUM GETMAIN AMOUNT 

0196 

COMINIO 

DS 

H 

MINIMUM SORTIO BUF TRANSFER COUNT 

03A2 

COMINKPB 

DS 

H 

MINIMUM KEYS PER BLOCK 

00EF 

COMINOUT 

DS 

C 

COMMON IN/OUT DATA SET 

08D8 

COMINSEG 

DS 

F 

MIN SIZE FOR 1ST SEGMENT 

OOFC 

C0MINUS4 

DS 

F 

MINUS 4 

0100 

C0MINUS8 

DS 

F 

MINUS 8 

0260 

COMIOBXQ 

DS 

F 

QUEUE OF EXCP IOBS 

0230 

COMIOLOC 

DS 

F 

SORTIO DATA ADDRESS IN IOX 

02BC 

COMIORPB 

DS 

F 

SORTIO REC PER BLOCK 

OOFO 

COMIOTYP 

DS 

C 

V-VIRTUAL » R = REAL 

0224 

C0MI0XAD 

DS 

F 

ADDRESS OF IOX 

0228 

COMIOXSZ 

DS 

F 

LENGTH OF IOX 

01A0 

COMIRECS 

DS 

F 

INPUT REC COUNT 

018E 

COMIRECZ 

DS 

H 

INPUT LRECL 

0800 

COMIRES 

DS 

F 

START OF RESIDUAL INPUT DATA 

01CC 

COMIRSAZ 

DS 

F 

INPUT RSA SIZE 

0370 

COMISCEL 

DS 

4C 

SWITCH VALUES 

0 001 

COMISREL 

EQU 

1 

0 => RELEASE SORTWORK SPACE 

0143 

COMJOB 

DS 

C 

TYPE/LOG JOB NAME 

0220 

COMKBLKZ 

DS 

F 

SIZE OF KAD BLOCK ENTRY 

021C 

COMKDATA 

DS 

F 

SIZE OF KAD PREFIX 

03AA 

COMKDELT 

DS 

H 

PRIMARY KEY MULTIPLE LOAD DELTA 

026C 

COMKEYFQ 

DS 

F 

FREE KEY HOLDER QUEUE 

0398 

C0MKEYPC 

DS 

H 

PRIMARY KEY COUNT 

039C 

C0MKEYPN 

DS 

H 

PRIMARY KEY MINIMUM 

0288 

COMKEYPQ 

DS 

F 

PRIMARY KEY QUEUE 

028C 

COMKEYPT 

DS 

F 

PRIMARY KEY QUEUE TAIL 

039E 

COMKEYPX 

DS 

H 

PRIMARY KEY MAXIMUM 

039 A 

COMKEYSC 

DS 

H 

SECONDARY KEY COUNT 

0290 

COMKEYSQ 

DS 

F 

SECONDARY KEY QUEUE 

03AO 

COMKEYSX 

DS 

H 

SECONDARY KEY MAXIMUM 

0294 

C0MKIRRF 

DS 

F 

KAD IRRR HOLDER FREE QUEUE 

0298 

COMKIRRQ 

DS 

F 

KAD IRRR HOLDER QUEUE 
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Pisp. 

Name 

Definition 

Descrlotion 

0174 

COMKLOAD 

DS 

F 

KEY LOAD SUBROUTINE ADDRESS 

01D0 

COMKOUNT 

DS 

F 

PRIMARY KAD COUNT 

0214 

COMKPB 

DS 

F 

KEYS PER WORKFILE BLOCK 

0218 

C0MKPFIX 

DS 

F 

SIZE OF BIN KAD PREFIX 

03A6 

COMKRECZ 

DS 

H 

KEY RECORD LENGTH 

0954 

COMKSAVE 

DS 

F 

KEY SAVE AREA ADDRESS 

0178 

COMKUNLD 

DS 

F 

KEY UNLOAD SUBROUTINE ADDRESS 

080C 

COMLADAD 

DS 

F 

BLOCKED LAD ADDR/ADDR (E35) 

0258 

COMLADFQ 

DS 

F 

LAD AVAILABLE LIST 

037C 

COMLADLM 

DS 

F 

LAD AREA LIMIT 

025C 

COMLADNQ 

DS 

F 

NEXT STRING LAD QUEUE 

0378 

COMLADS 

DS 

F 

LAD AREA ADDRESS 

013C 

COMLCTR 

DS 

C 

INITIAL LINE COUNTER VALUE 

0180 

COMLDKAD 

DS 

F 

ADDRESS OF KAD LOAD ROUTINE 

08F8 

COMLEND 

DS 

F 

UNBALANCED LIST END 

0394 

COMLIMIT 

DS 

F 

BOUND LIMIT 

0130 

COMLINES 

DS 

C 

LINES PER PAGE 

08F4 

COMLIST 

DS 

F 

UNBALANCED LIST HEAD 

01FC 

COMLISTA 

DS 

F 

LIST HEADER FOR MERGE SORT 

0200 

COMLISTB 

DS 

F 

LIST HEADER FOR MERGE SORT 

016C 

COMLOAD 

DS 

F 

LOAD SUBROUTINE ADDRESS 

042C 

COMLOCAL 

DS 

22F 


013B 

COMLOG 

DS 

C 

LOG MESSAGE CLASS 

0900 

COMLOKEY 

DS 

F 

POINTER TO LOW LIMIT KEY AREA 

022C 

COMLOWIO 

DS 

F 

LOW I/O ADDRESS 

0149 

COMLPA 

DS 

C 

IPUT AND OPUT ARE IN LPA 

095C 

COMLSTAB 

DS 

F 

LENGTH STATISTICS TABLE 

0 3AC 

COMLSTAR 

DS 

H 

1ST TWO BYTES OF JFCLSTAR 

0958 

COMLSTAT 

DS 

F 

LENGTH STATISTICS CTR PTR 

one 

COMMAIN 

DS 

F 

MAX FOR SIZE= NOT SPECIFIED 

01BC 

COMMAINO 

DS 

OF 

SAVED INIT MAIN STORAGE VALUE 

01C0 

COMMAIN1 

DS 

F 

SELECTED BIN RECORD COUNT 

01C8 

C0MMAIN2 

DS 

OF 

USED MAIN STORAGE VALUE 

01 DC 

COMMAREA 

DS 

F 

ADDRESS OF COMMON WORK AREA 

01E0 

COMMEND 

DS 

F 

ADDRESS OF END OF COMMON WORK AREA 

OOEB 

COMMNOGO 

DS 

C 

ERROR ENCOUNTERED INDICATOR 

0000 

COMMON 

DS 

3F 

START OF OS SAVE AREA 

08BC 

COMMSGPR 

DS 

H 

MESSAGE PARAMETER SAVE AREA 

0828 

COMMSGSW 

DS 

X 

INFORMATION MSG FLAG BYTE 

0020 

COMMSNAP 

EQU 

32 

SNAP WRITE BACK BLOCKS 

00EE 

COMMTEST 

DS 

C 

TEST STATUS INDICATOR 

0008 

COMMTPHO 

EQU 

8 

ISSUE PHASE 0 MESSAGES 

0040 

COMMTSEQ 

EQU 

64 

SEQUENCE CHECK SORTOUT 

0020 

COMMTVER 

EQU 

32 

VERIFY BIN COUNT 

0080 

COMMT190 

EQU 

128 

ISSUE 190 MESSAGES 

0968 

COMMVARY 

EQU 

X 

BEGINNING OF VARIABLE AREA 

0820 

COMMXBLK 

DS 

F 

MAX SORTIN BLKSIZE FOR SMF 

0104 

COMMXCTL 

DS 

CL8 

NAME TO XCTL TO 

0428 

COMNMAX 

DS 

F 

ESTIMATED NMAX VALUE 

0147 

COMOBEND 

DS 

C 

ABEND IF ERROR DURING OTHER PHASE 

018C 

COMOBLKZ 

DS 

H 

OUTPUT BLOCKSIZE 

0148 

COMODUMP 

DS 

C 

DUMP OPTION FOR OBEND 

0189 

COMOFORM 

DS 

C 

OUTPUT RECFM 

0384 

COMOIOB 

DS 

F 

OUTPUT IOB 

0808 

COMOJFCB 

DS 

F 

ADDRESS OF SORTOUT JFCB 

0364 

COMOLEND 

DS 

F 

END OF OPEN LIST 

0360 

CONOLIST 

DS 

F 

OPEN LIST ADDRESS 

0834 

COMOPLOC 

DS 

2 0 F 

OPTION STATEMENT WORK AREA 

0104 

COMOPTNS 

DS 

OF 


0048 

COMOPTZ 

EQU 

*-COMOPTNS SIZE OF OPTIONS 

010C 

COMOPWTO 

DS 

CL12 

WTO HEADER AND ROUTINE 

01A4 

COMORECS 

DS 

F 

OUTPUT REC COUNT 

0190 

COMORECZ 

DS 

H 

OUTPUT LRECL 

0808 

COMORES 

DS 

F 

START OF RESIDUAL OUTPUT DATA 
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P-isp. 

Name 

Definition 

Description 

029C 

COMOVALT 

DS 

F 

ALTERNATE REC MOVE ' 

0400 

COMOVKAD 

DS 

CL18 

MVC 0(KADLIST,R1),0(R15) 

03BE 

COMOVKEY 

DS 

CL6 

MVC 0(,R1),0(R15) 

017C 

COMOVREC 

DS 

F 

ADDRESS OF RECORD MOVE ROUTINE 

03C4 

COMPAB 

DS 

CL6 

CLC 8(,R4),0(R3) 

03F4 

COMPALTA 

DS 

CL6 

CLC 4(,R2),0(R4) 

03FA 

COMPALTB 

DS 

CL6 

CLC 4C,R3),0 CR4 ) 

03E8 

COMPARE 

DS 

F 

CLC '0( ,R14),0(R15) 

02B8 

COMPAREZ 

DS 

F 

LENGTH OF COMPARE 

0908 

C0MPARZ6 

DS 

F 

OFFSET IN BIN TO SEG BYTE 

03CA 

COMPCOPA 

DS 

CL6 

CLC 4(,R4),0CR14> 

03D0 

COMPCOPB 

DS 

CL6 

CLC 4(,R5),0(R14) 

03D6 

COMPCOPC 

DS 

CL6 

CLC 0(,R4),0(R14) 

08FC 

COMPEERS 

DS 

F 

PEERAGE ACCUMULATOR 

013F 

COMPFIX 

DS 

CL3 

PREFIX NAME 

03E2 

COMPICK 

DS 

CL6 

CLC 0(,R2),BVDKEY-BVDSECT(R4) 

07F0 

COMPLADS 

DS 

6F 


07EC 

COMPLAST 

DS 

F 

LAST LIST ENTRY 

0774 

COMPLIST 

DS 

30F 


07F0 

COMPLONG 

DS 

6 F 


00F4 

COMPMODE 

DS 

C 

* L'=L0W, 1 H'=HIGH 

03B8 

COMPMOVE 

DS 

OH 


03DC 

COMPPOUND 

DS 

CL6 

CLC 0(,R2),0(R8) 

014C 

COMPRDCB 

DS 

F 

ADDRESS OF SYSOUT DCB 

0164 

COMPRDEC 

DS 

F 

ADDRESS OF SYSOUT DEC 

0138 

COMPRINT 

DS 

C 

PRINT MESSAGE CLASS 

03B2 

COMPRIZE 

DS 

H 

PRIOR BLOCK SIZE 

03EE 

COMPSLAB 

DS 

CL8 

CLC 4(,R4),4(R5) 

03CA 

COMPSLAK 

DS 

CL6 

CLC 4(,R4),0(R14) 

03D0 

COMPSLBK 

DS 

CL6 

CLC 4(,R5),0(R14) 

0150 

COMRDDCB 

DS 

F 

ADDRESS OF SYSIN DCB 

0168 

COMRDDEC 

DS 

F 

SYSIN DECB ADDRESS 

00EA 

COMRECFM 

DS 

C 

SORT RECORD FORM 

02D0 

COMRECNO 

DS 

2C 

LATEST R 

0210 

COMRPB 

DS 

F 

RECORDS PER WORKFILE BLOCK 

01C8 

COMRSASZ 

DS 

F 

RSA SIZE 

08B4 

C0MRSAV1 

DS 

F 

REGISTER SAVE AREA 

08B8 

C0MRSAV2 

DS 

F 

REGISTER AREA 

08E0 

COMRSAWK 

DS 

F 

RSA TO WORK BUF ROUTINE 

08E4 

COMRSTOR 

DS 

F 

RESTORE LIST POINTER 

0810 

COMRTAIL 

DS 

F 

LAST FOUR BYTES OF RECORD 

01C4 

COMRUNS 

DS 

F 

RUNS DISTRIBUTED BY INPUT PHASE 

01B0 

COMRUNSZ 

DS 

F 

CURRENT RUN LENGTH 

01E8 

COMSAD 

DS 

F 

ADDRESS OF FIRST SOTRAGE AREA DESC 

02C4 

COMSAVEI 

DS 

F 

TIOT ENTRY FOR SORTIN 

02C8 

COMSAVEO 

DS 

F 

TIOT ENTRY FOR SORTOUT 

OOOC 

COMSAVEO 

DS 

15F 

LEVEL ZERO SAVE AREA 

0048 

COMSAVEI 

DS 

13F 

LEVEL ONE SAVE AREA 

007C 

C0MSAVE2 

DS 

13F 

LEVEL TWO SAVE AREA 

00B0 

C0MSAVE3 

DS 

13F 

LEVEL THREE SAVE AREA 

0120 

COMSERVE 

DS 

F 

AMOUNT OF RESERVED MEMORY 

013E 

COMSGLST 

DS 

C 

LIST CONTROL CARDS OPTION 

0910 

COMSGTOT 

DS 

F 

TOTAL BYTES SEGMENTED 

01F8 

COMSHORT 

DS 

F 

MAIN STORAGE DEFICIT 

038C 

COMSIRRR 

DS 

F 

SECONDARY KEYFILE IRRR 

00F3 

COMSKEYS 

DS 

C 

SECONDARY KEEP PRODUCED 

00F5 

COMSKIPM 

DS 

C 

•Y’=SKIP INTERMEDIATE MERGE 

081F 

COMSMF 

DS 

c 

*S'=SHORT SMF RECORD 

'F'=FULL SMF RECORD (NOT VALID FOR FLR) 
•N’=NO SMF RECORD 

0124 

COMSPFIX 

DS 

CL4 

’SORT' DD PREFIX OR ALIAS 

0368 

CONSORT 

DS 

F 

SQUARE ROOT OF RPB 

0144 

COMSTEP 

DS 

C 

TYPE/LOG STEP NAME 
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Plsp. Name Definition Description 


01EC 

COMSPACE 

DS 

F 

BYTES AVAILABLE 

0184 

COMSTORE 

D5 

F 

RESTORE CODE ADDRESS 

014A 

COMSVC 

DS 

H 

SVC FOR SORT 

0818 

COMSYSRV 

DS 

F 

SYSTEM RESERVED 

00ED 

COMSYSTM 

DS 

C 

SYSTEM TYPE FROM CVT 

0128 

COMSYSUT 

DS 

CL8 

SYSOUT FILE NAME 

04F0 

COMTABLE 

EQU 

COMERGES 

i - 4 TRANSLATE/SIZE TABLE 

02C0 

COMTIOT 

DS 

F 

ADDRESS OF TIOT 

0904 

COMTOTAL 

DS 

F 

TOTAL RSA BYTES NOT IN OUTPUT RUN 

0834 

COMTRACE 

DS 

IF 

TRACE X'Ol'-X’OF' E15/E35 IN/OUT 
AREA RECOR LEVEL 

082C 

COMTRACK 

DS 

F 

(♦TRACKS ALLOCATED FOR SORTWK 

02A0 

COMTRACT 

DS 

F 

EXTRACT ADDRESS 

081C 

COMTRANS 

DS 

X 

TRANSFER INDICATION FOR ICEMESS 

02D2 

COMTRBAL 

DS 

H 

CURRENT TRACK BALANCE 

0204 

COMTREE 

DS 

F 

40F 

0644 

COtITREEA 

DS 

40F 


06E4 

COMTREED 

DS 

16F 


05B4 

COMTREEI 

DS 

36F 


0724 

COMTREES 

DS 

20F 


02D4 

COMTRSAV 

DS 

H 

PREVIOUS TRACK BALANCE 

0208 

C0MTSIZE 

DS 

F 

OFFSET TO LAST NODE 

0824 

COMTTIME 

DS 

F 

CPU TIME WORK AREA FOR SMF 

013A 

COMTYPE 

DS 

C 

TYPE MESSAGE CLASS 

08F0 

C0MUNBAL 

DS 

F 

ADDRESS OF UNBALANCED MERGE 

0170 

COMUNLD 

DS 

F 

UNLOAD SUBROUTINE ADDRESS 

0158 

COMUTDCB 

DS 

F 

SORTOUT DCB ADDRESS 

091C 

COMUTFIL 

DS 

F 

SORTOUT BYTE COUNT 

01B4 

COMVALCT 

DS 

F 

BVAL STANDARD COUNT 

01B8 

COMVALPR 

DS 

F 

BVAL PRIOR COUNT 

0829 

COMVBLKS 

DS 

C 

N=BYPASS VLR BLOCKSET 

0003 

COMVERSE 

EQU 

3 

CURRENT COMMON VERSION NUMBER 

0OE4 

C0MVERZN 

DS 

H 

CONTAINS COMVERSE 

05FC 

COMVIO 

DC 

C 

VIO/NOVIO SWITCH 

00E6 

CONVOKED 

DS 

C 

USER INVOKED STATUS 

0194 

COMVOLCT 

DS 

c 

SORTIN VOLUME COUNT 

03AE 

COMWDXLS 

DS 

H 

WORKFILE DXLS 

02E4 

COMWJOB 

EQU 

COMWMTAG + 2 JOB NAME 

015C 

COMWKDCB 

DS 

F 

SORTWK OPEN LIST ADDRESS 

0914 

COMWKFIL 

DS 

F 

BYTES IN WORK FILE 

0234 

COMWKLOC 

DS 

F 

SORTWK DATA ADDRESS IN IOX 

08DC 

COMWKRSA 

DS 

F 

WORK BUF TO RSA ROUTINE 

08CC 

COMWKSIZ 

DS 

F 

SIZE OF WORK AREA 

02F6 

COMWMESS 

EQU 

COMWSTEP 

1 + 9 MESSAGE 

02DF 

COMWMNUM 

EQU 

COMWPFIX + 3 MESSAGE NUMBER 

02E2 

COMWMTAG 

EQU 

COMWMNUM 

1 + 3 MESSAGE TAG 

02DC 

COMWPFIX 

EQU 

COMWTEXT 

MESSAGE PREFIX 

02B0 

COMWRECZ 

DS 

F 

SIZE OF A WORKFILE RECORD 

08C4 

COMWRES 

DS 

F 

START OF RESIDUAL WORK AREA 

0354 

COMWROUT 

DS 

F 

ROUTINE FOR WTO 

02ED 

COMWSTEP 

EQU 

COMWJOB 

+ 9 STEP NAME 

02DC 

COMWTEXT 

CL 120 

TEXT OF WTO 

02D8 

COMWTO 

DS 

F 

HEADER FOR L FORM OF WTO 

03B8 

COMXCRUN 

DS 

CL6 

XC 0(,R1),0(R1) 

0004 

COMXEOl 

EQU 

4 

E01 IS PRESENT 

0010 

COMXE03 

EQU 

16 

E03 IS PRESENT 

0001 

C0MXE15 

EQU 

1 

E15 IS PRESENT 

0002 

C0MXE35 

EQU 

2 

E35 IS PRESENT 

0371 

COMXSTAT 

EQU 

COMISCEL 

+ 1 EXIT STATUS 

02D6 

COMXTENT 

DS 

H 

CURRENT EXTENT 

0160 

COM01DCB 

DS 

F 

S0RTIN01 OPEN LIST ADDRESS 

0424 

C0M2NDRY 

DS 

F 

SECONDARY ALLOCATION WORD 

0724 

COM43LST 

DS 

OF 

LIST AREA FOR CON043A MSGS 
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COMMA CROSS-REFERENCE TABLE (PEERAGE/VALE) 


The following table contains the names of the COMMA fields 
together with their displacements. 


DISP LABEL ATTR COMMENT 


5E5 

CABRETRN 

BIT(1) 

188 

CADD 

PTRC31) 

188 

CADDI5P 

FIXED!31) 

18C 

CADDS 

PTR(31) 

3F4 

CADDTAB 

FIXED!31) 

495 

CALLOCND 

BIT! 1) 

80C 

CAVGRCDL 

FIXED!31) 

154 

CBALADDR 

PTR!31) 

190 

CBASEMIN 

FIXED!15) 

3A4 

CBASESIZ 

FIXED!31) 

194 

CBINBLK 

PTR!31) 

198 

CBINSIZE 

PTR!31) 

7 EC 

CBLDLNAM 

CHAR!8) 

3E4 

CBLKIN 

FIXED!15) 

19C 

CBLKITTR 

PTR!31) 

1A4 

CBLKLSIZ 

FIXED!31) 

6 AO 

CBLKPTRK 

FIXED!31) 

346 

CBLKSET 

CHAR!1) 

1F4 

CBRANCHP 

PTR! 31) 

1 AO 

CBUFFER 

PTR!31) 

1A8 

CBUFPTR 

PTR!31) 

7 AC 

CBUGADDR 

FIXED!31) 

5E5 

CB37MSG 

BIT!1) 

347 

CCHALT 

CHAR!1) 

34A 

CCHECK 

CHAR!1) 

4A0 

CCHECKPT 

CHAR! 1) 

1 AC 

CCHIDX1 

FIXED!31) 

1B0 

CCHIDX2 

FIXED!31) 

1B4 

CCHIDX3 

FIXED!31) 

1B8 

CCHIDX4 

FIXED!31) 

1BC 

CCHIDX5 

FIXED!31) 

495 

CCONCASW 

BIT! 1) 

4A3 

CCONMODE 

CHAR!1) 

1C4 

CCONNEG4 

FIXED!31) 

330 

CCONSMOD 

CHAR!1) 

ICO 

CC0N256 

FIXED!31) 

1C8 

CC0RESAV 

FIXED!31) 

333 

CCRITMOD 

CHAR!1) 

1D4 

CCURRBLK 

PTR131) 

150 

CDALADDR 

PTR131) 

1E4 

CDATLEN 

FIXED!31) 

1DC 

CDATLOC 

BDY!WORD) 

1D8 

CDCBLIST 

PTRI31) 

494 

CDDFIRST 

BIT! 1) 

21E 

CDEBUG 

CHAR!1) 

1E8 

CDECAREA 

PTR131) 

784 

CDECAREB 

PTR! 31) 

588 

CDECDED 

PTR! 31) 

57C 

CDECL1 

FIXED!31) 

58 0 

CDECL2 

FIXED!31) 

584 

CDECL3 

FIXED!31) 

1EC 

CDECSIZE 

FIXED!31) 

1F0 

CDELCNT 

FIXED!31) 

1F4 

CDELETE 

PTR!31) 

588 

CDEVWK 

PTR!31) 

1F8 

CDEXCTR 

FIXED!31) 

1FC 

CDEXITTR 

PTR! 31) 


TO PREV SEC. ENTR OF ABENDR 
ADDR. OF TREEADD ROUTINE 
TREEGEN WORK CONSTANT 
ADDR. OF TREEADDS ROUTINE 
TREEGEN WORK AREA 
ALL WORKFILES ALLOCATED 
AVGERAGE RECORD LENGTH 
ADDR. OF ROUTINE BALLOCAT 
BASE-BIN MIN ALLOC 
BASE-BIN SIZE 3PTM411M 
ADDR TO BINBLK Q 
RSA BIN SIZE FOR MERGING 
MEMBER NAME FOR SORTIN 
INPUT BLOCKSIZE 
NEXT UNUSED ITTR 
SIZE OF FREE BLOCK LIST 
BLKS/TRK LOACALLY 
Y=BLOCKSET MAY BE USED 
ADDR. OF TREEGEN BR-TABLE 
ADDR. OF CURRENT WORK BUF 
IN - PTR IN BUFF TO VLR 
ICEBUG AREA ADDRESSES 
B37 RECOVERY MAG FLAG 3L5A 
C=TRANSLATE CH AND AQ 
Y=CHECK COUNTERS 
YES = TAKE CHECKPOINTS 
INDEX AREA 1 HEAD 
INDEX AREA 2 HEAD 
INDEX POOL HEAD 
POOL AREA 1 HEAD 
POOL AREA 2 HEAD 
CONCATENATION OF DATASETS 
Y=PEER N=NONPEER 0=5734 
CONSTANT = -4 

Y = MESSAGES TO CONSOLE 
CONSTANT = 256 
ORIGINAL SIZE PARM 

Y = PRINT CRITICAL MSG 
ADDR TO CURR BINBLK 

ADDR. OF ROUTINE DALLOCAT 
DATA BLOCK SIZE 
ICEMAN BASEREGS • 

ADDR. OF OPEN/CLOSE LIST 

PROC.FIRST DDNAME CHARACTER 

DEBUG SWITCH BYTE 

ADDR. OF SORTIN/OUT DECB 

USED IN ICELINK 

ICEDEC - ICEDED COMM 

REC LEN1 IN DEC 

REC LEN2 IN DEC 

REC LEN3 IN DEC 

SIZE OF SORTIN/OUT DECB 

BYTES DELETE IN RSA 

ADDR. OF TREELETE ROUTINE 

PTR TO DEV WORK AREA 

HI/LO INDEX COUNTER 

INDEX BLOCK ITTR 
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DISP 

LABEL 

ATTR 

200 

CDEXPBUF 

FIXED(31) 

204 

CDEXPTRK 

FIXEDC31) 

49E 

CDIAGMOD 

CHARC1) 

218 

CDIMSHI 

FIXEDU6) 

7E2 

CDISPMOD 

CHAR(l) 

496 

CDKALLOC 

BITC1) 

6 EC 

CDOT 

CHARC1) 

208 

CDYNAMIC 

PTRC31) 

496 

CDYNGEN 

BITC1) 

21B 

CDYNLEN 

PTRC8) 

214 

CDYNNUMB 

FIXED C 31) 

495 

CDYNSW 

BIT(l) 

20C 

CDYNWK 

CHARC8) 

20C 

CDYNWK1 

PTRC8) 

21C 

CEBUFFRS 

FIXED(16) 

228 

CEMERGE 

FIXED(31) 

21F 

CENDMODE 

CHARC1) 

178 

CEQDISPL 

PTRC31) 

794 

CEQE25 

PTRC31) 

794 

CEQE250P 

CHAR(2) 

334 

CEQUALS 

CHARC1) 

337 

CERRINV 

CHAR(l) 

494 

CERRSW1 

BITC1) 

494 

CERRSW2 

BIT(1) 

336 

CERRU016 

CHAR(l) 

4A8 

CESTIMSZ 

CHARC1) 

4A7 

CEXACTSZ 

CHAR(l) 

7AA 

CEXCPIN 

CHAR(l) 

7AB 

CEXCPOUT 

CHARCl) 

790 

CEXITDEL 

PTRC31) 

78C 

CEXITLOA 

PTR(31) 

22C 

CEXITPH1 

FIXED(31) 

230 

CEXITPH2 

FIXEDC 31) 

234 

CEXITPH3 

FIXEDC31) 

57C 

CEXITTAB 

CHARC16) 

23C 

CEXIT11 

BDYCWORD) 

248 

CEXIT15 

BDY(WORD) 

254 

CEXIT16 

BDYCWORD) 

260 

CEXIT17 

BDYCWORD) 

26C 

CEXIT18 

BDY(WORD) 

284 

CEXIT19 

BDYCWORD) 

29C 

CEXIT21 

BDYCWORD) 

768 

CEXIT25 

BDYCWORD) 

2A8 

CEXIT27 

BDY(WORD) 

2B4 

CEXIT31 

BDY(WORD) 

2C0 

CEXIT35 

BDY(WORD) 

2CC 

CEXIT37 

BDYCWORD) 

2D8 

CEXIT38 

BDY(WORD) 

2E4 

CEXIT39 

BDYCWORD) 

290 

CEXIT61 

BDY(WORD) 

341 

CEXMODE 

CHARCl) 

224 

CEXPAND 

FIXEDC 31) 

220 

CEXTRACT 

PTRC31) 

244 

CE11CALL 

PTRC31) 

244 

CE11LNG 

FIXEDC 31) 

23C 

CE11NAME 

CHARC8 ) 

248 

CE15ADDR 

PTRC31) 

250 

CE15CALL 

PTRC31) 

6D4 

CE15DELT 

BITC1) 

250 

CE15LNG 

FIXEDC 31) 

4A4 

CE15M0D 

CHARC1) 

248 

CE15NAME 

CHARC8) 

58C 

CE15PARM 

CHARC4) 

25C 

CE16CALL 

PTRC31) 

25C 

CE16LNG 

FIXEDC31) 


COMMENT 


INDEX ENTRIES PER BUFFER 
INDEX ENTRIES PER TRACK 
YES = PRINT DIAGNOSTICS 
HI CONTROL FIELD FOR IMS 
DISP IS MOD FOR SORTOUT 
SORTDK ALLOCATED 
DOT 

ADDR OF UNUSED DYNAMIC AREA 
DYNALLOC GENERIC NAMES USED 
DYNALLOC FIELD LENGTH 
NUMB OF DYN ALLOC DEVICES 
ONE DYNALLOC FAILED 
DYN ALLOC DEVICE TYPE 
1ST BYTE OF DYN DEV TYPE 
NUMBER OF E-PHASE BUFFERS 
MERGE ORDER - ELIMINATION 
NO = UNEXPECTED SYSIN EOF 
WORK AREA FOR EXTRACT 
PICK UP EQUALS FIELD 
OP CODE ICM 

Y = PRESERV ORDER OF EQUALS 

Y = CRITICAL ERROR ABEND 
ERROR IN REQUIRED PARAMETER 
ERROR IN OPTIONAL PARAMETER 

Y = CRITICAL ERROR ABEND 

YES = ESTIM. SIZElFILSZ 
YES = EXACT FILSZ GIVEN 
EXCP CAN BE USED FOR SORTIN 
EXCP -//- SORTOUT 

EXIT DELETE ROUTINE ADDR. 
EXIT LOAD ROUTINE ADDRESS 
LNG OF PHI RTNS 

LNG OF PH2 RTNS 

LNG OF PH3 RTNS 

EXIT RETURN BRANCHTAB 

Ell EXIT- 

E15/E32 EXIT - 

E16 EXIT 

E17 EXIT 

E18 EXIT 

E19 EXIT 

E21 EXIT 

EXIT25 

E27 EXIT 

E31 EXIT 

E35 EXIT - 

CE37 EXIT 

E38 EXIT 

E39 EXIT 

E61 EXIT 

R=EXCPVR V=EXCP X=MVT 
INT LRECL EXPAND POS OR NEG 
ADDR. OF EXTRACT ROUTINE 
CALL ADDRES 
EXIT LENGTH 
NAME 

PASSED ADDRESS 
CALL ADDRESS 
1=E15 DELETED 
LENGTH 

YES = E15 ADDRESS GIVEN 
NAME 

E15 PARAMEYER LIST 
CALL ADDR 
E16 LENGTH 
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254 

CE16NAME 

CHARC8) 

268 

CE17CALL 

PTRC31) 

268 

CE17LNG 

FIXEDC 31) 

260 

CE17NAME 

CHARC8) 

274 

CE18CALL 

PTRC31) 

238 

CE18E0D 

PTR(31) 

27C 

CE18EXL 

PTRC31) 

274 

CE18LNG 

FIXED(31> 

26C 

CE18NAME 

CHARC8) 

280 

CE18PSW 

PTRC31) 

278 

CE18XLST 

PTRC31) 

28C 

CE19CALL 

PTRC31) 

28C 

CE19LNG 

FIXED(31) 

284 

CE19NAME 

CHARC8) 

2A4 

CE21CALL 

PTRC31) 

2A4 

CE21LNG 

FIXEDC31) 

29C 

CE21NAME 

CHARC8) 

770 

CE25CALL 

PTR(31) 

770 

CE25LNG 

FIXED(31) 

768 

CE25NAME 

CHARC8) 

2B0 

CE27CALL 

PTR(31) 

2B0 

CE27LNG 

FIXEDC 31) 

2A8 

CE27NAME 

CHARC8) 

2BC 

CE31CALL 

PTR(31) 

2BC 

CE31LNG 

FIXEDC 31) 

2B4 

CE31NAME 

CHAR(8) 

24C 

CE32M0 

FIXED(31) 

24D 

CE32M024 

PTRC24) 

2C0 

CE35ADDR 

PTR(31) 

5F4 

CE35AREA 

PTR(31) 

2C8 

CE35CALL 

PTR (31 ) 

2C8 

CE35LNG 

FIXEDC 31) 

4A5 

CE35M0D 

CHARC1) 

2C0 

CE35NAME 

CHARC8) 

590 

CE35PARM 

CHARC12) 

2D4 

CE37CALL 

PTRC31) 

2D4 

CE37LNG 

FIXEDC 31) 

2CC 

CE37NAME 

CHARC8) 

2E0 

CE38CALL 

PTRC31) 

2E0 

CE38LNG 

FIXEDC 31> 

2D8 

CE38NAME 

CHARC8) 

2EC 

CE39CALL 

PTRC31) 

2F0 

CE39EXL 

PTRC31) 

2EC 

CE39LNG 

FIXEDC 31) 

2E4 

CE39NAME 

CHARC8) 

2F4 

CE39PSW 

PTRC31) 

2F8 

CE39XLST 

PTR(31) 

298 

CE61CALL 

PTRC31) 

298 

CE61LNG 

FIXEDC 31) 

290 

CE61NAME 

CHARC8) 

2FC 

2FF 

CE61PADD 

CE61PARM 

CE61PCF 

FIXEDC 31) 

CHAR (1) 

496 

CE61PLEN 

CFAKE35 

FIXEDC 31) 
BIT C1) 

308 

CFIELDS 

FIXEDC 31) 

804 

CFILBYTE 

FIXEDC 31) 

310 

CFILIMIT 

PTRC31) 

30C 

CFILSIZE 

FIXEDC 31) 

30D 

CFILSZ24 

PTRC24) 

495 

CFIRSTSW 

BIT(1) 

495 

CFIRSTSB 

CFIXPAGE 

BIT(1) 
BITC1) 

5D7 

CFIXREC 

BITC1) 

314 

CFREECTR 

FIXEDC31) 


NAME 

CALL ADDRESS 
E17 LENGTH 
NAME 

CALL ADDRESS 

USER EOD ADDR 

ADDR TO VSAM EXIT LIST 

E18 LENGTH 

NAME 

ADDR TO VSAM PASSW. LIST 
ADDR TO USER XLISTC5) RTN 
CALL ADDRESS 
E19 LENGTH 
NAME 

CALL ADDR 
E21 LENGTH 
NAME 

AND ITS CALL ADDRESS 
EXIT E25 LENGTH 
EXIT E25 NAME 
CALL ADDR 
E27 LENGTH 
NAME 

CALL ADDRESS 
E31 LENGTH 
NAME 

E32 MERGE ORDER 

PASSED ADDRESS 

CALL ADDRESS 
LENGTH 

YES = E35 ADDRESS GIVEN 
NAME 

E35 PARAMETER LIST 
CALL ADDRESS 
E37 LENGTH 
NAME 

CALL ADDRESS 
E38 LENGTH 
NAME 

CALL ADDRESS 

ADDR TO VSAM EXIT LIST 

E39 LENGTH 

NAME 

ADDR TO VSAM PASSW. LIST 
ADDR TO USER XLISTC5) RTN 
CALL ADDR 
E61 LENGTH 
NAME 

REC ADDRESS 

E61 PARM LIST 

CONTR FIELD NUMB 

CONTR FIELD LEN 

L2 GET L3 SWITCH 

NUMBER OF CONTROL FIELDS 

FILE SIZE. ACCUM (BYTES) 

ADDR. OF END OF BUFFER 
USER SPECIFIED FILE SIZE 
THREE BYTES 

OPEN OF FIRST DATA SET 
1=FIRST SUB-BIN 
PROTECTED AREA FIXED 

ON = FIXED LENGTH RECORDS 

AVAILABLE RSA BIN COUNT 
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LABEL 

ATTR 

180 

CFREHEAD 

PTRC31) 

180 

CFRELIST 

BDY!DWORD) 

144 

CFRESTOR 

PTR< 31) 

184 

CFREZERO 

FIXED!31) 

6D4 

CFRSTBIN 

BIT(l) 

148 

CGALADDR 

PTRC31) 

320 

CGENDOPT 

BDY(WORD) 

32C 

CGENDOP1 

BDY(WORD) 

140 

CGETMAIN 

PTR(31) 

354 

CGETMTMP 

PTRC31) 

35C 

CGETPRM 

PTRI31) 

358 

CGETREC 

PTR(31) 

354 

CGETTMP 

PTR!31) 

318 

CGMINDEX 

FIXED!31) 

368 

CHBUF1 

FIXED!31) 

360 

CHECKDCB 

FIXED!31) 

36C 

CHKBLK 

FIXED!31) 

364 

CHKTTSTR 

PTR!31) 

378 

CIBSPACE 

FIXED!31) 

374 

CIBUFFER 

PTR! 31) 

384 

CIDEXSIZ 

FIXED!31) 

390 

CIDXLEN 

FIXED!31) 

352 

CIDXPLB 

FIXED!15) 

495 

CIMS 

BIT!1) 

496 

CINCHAIN 

BIT! 1) 

7F8 

CINCONCA 

CHAR!1) 

6D4 

CINCORE 

BIT!1) 

37C 

CINDEX 

PTR!31) 

380 

CINDEXHI 

PTR!31) 

780 

CINDEXH1 

PTR!31) 

77C 

CINDEX1 

PTR!31) 

394 

CINLOC 

FIXED!31) 

370 

CINSIZE 

FIXED!31) 

18C 

CINSTRLT 

FIXED!31) 

49F 

CINVOKED 

CHAR!1) 

ICC 

CIOHOLD 

FIXED!31) 

ICC 

CIOINIT 

FIXED!31) 

15C 

CIORADDR 

PTR!31) 

1D0 

CI0SAV13 

FIXED!31) 

388 

CITTFQ 

PTR! 31) 

214 

CITTR 

FIXED!31) 

210 

CITTRA 

FIXED!31) 

38C 

CITTWQ 

PTR!31) 

6E4 

CJOBNAME 

CHAR!8) 

4AA 

CKEYMODE 

PTR!8) 

398 

CKEYSIZE 

FIXED!31) 

3A8 

CLASTIME 

FIXED!31) 

1EC 

CLATCNT 

FIXED!31) 

3E8 

CLCLTH 

FIXED!31) 

3E4 

CLCNUM 

FIXED!31) 

7FC 

CLENSTAT 

PTRI31) 

41C 

CLINK 

FIXED!31) 

778 

CLINKREQ 

CHAR!1) 

7A8 

CLISTMAD 

CHAR!1) 

335 

CLISTMOD 

CHAR!1) 

3AC 

3AC 

CLOCKS 

CLOCKO 

FIXED!31) 

3B0 

CLOCK1 

FIXED!31) 

3D4 

CLOCKIO 

FIXED!31) 

3D8 

CLOCK11 

FIXED!31) 

3DC 

CL0CK12 

FIXED! 31) 

3E0 

CL0CK13 

FIXED!31) 

3B4 

CL0CK2 

FIXED!31) 

3B8 

CL0CK3 

FIXED!31) 

3BC 

CL0CK4 

FIXED!31) 


COMMENT 


ADDR. OF FIRST FREE AREA 
START OF FREE SPACE CHAIN 
ADDR. OF ROUTINE FREESTOR 
SIZE OF ZEROTH FREE AREA 
1=FIRST BIN ALLOC 
ADDR. OF ROUTINE GALLOCAT 
SORT GENERATED DEFAULTS: 

SORT GEN DEFAULTS CONT: 

ADDR. OF ROUTINE GETMAINS 

ADDR. OF TEMP. GETM. AREAS 

PERM AREAS CHAIN 

ADDR. OF INPUT GET ROUTINE 

ALTERNATE NAME 

INDEX IN GETMAIN TABLE 

INDEX HDR BFR ADDR 

CHECKPOINT DCB POINTER 

TOTAL BLKS EST FOR PRIM EXT 

CHKPT ITT SAVE AREA 

INPUT BFR SPACE 

ADDR. OF INPUT INDEX BUFFER 

INDEX ENTRY SIZE 

INDEX BLOCK SIZE 

BLOCKS/LOGIC INDEX 

SORT INVOKED BY IMS 

NO CHAIN SCHED FOR SORTIN 

CONCATENATED SORTIN FLAG 

l=INCORE SORT 

ADDR. OF INPUT INDEX ENTRY 
ADDR. OF END OF INDEX BUF 

BUFFER POINTERS 

ADDR TO INPUT REC 

SORTIN LOGICAL RCD LENGTH 

TREEGEN WORK AREA 

YES = DYNAMIC INVOCATION 

HOLD SW/Q END 

ADDR OF INIT ROUT 

ADDR. OF ROUTINE INOUTRTN 

I/O TASK SAVE AREA 

HEAD OF FREE TRACK HOLDERS 

ITTR PTR TO 1ST INP STRING 

ALTERNATE ITTR PTR 

HEAD OF AVAIL. TRACK QUEUE 

JOB NAME 

NUMBER OF INDEXES PER TRACK 
SIZE OF CONTROL WORD 
LAST ENTRY TO REAL TIME RTN 
# OF LA-INSTR. IN RCD-MOVE 
LENGTH LAST CLC. TREEGEN 
NO. OF CLC-INSTR. TREEGEN 
SMF WORK AREA PTR 

ZERO IF NO MORE MOD TO CALL 
FLAGS LINKEDITING REQUEST 
TEMP SAVE FOR CLISTMOD 
Y = LIST CONTROL CARDS 
TIME ACCUMULATORS 
C-PHASE ELAPSED TIME 
C-PHASE CPU TIME 
SPECIAL CLOCK 2 
SPECIAL CLOCK 3 
SPECIAL CLOCK 4 
SPECIAL CLOCK 5 
P-PHASE ELAPSED TIME 
P-PHASE CPU TIME 
R-PHASE ELAPSED TIME 
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3C0 

CLOCKS 

FIXED!31) 

3C4 

CLOCK6 

FIXEDC31) 

3C8 

CL0CK7 

FIXED!31) 

3CC 

CL0CK8 

FIXED!31) 

3D0 

CL0CK9 

FIXED!31) 

39C 

CLOCSIZE 

BDY(WORD) 

779 

CLODCNTl 

CHAR!1) 

77A 

CL0DCNT2 

CHAR!1) 

77B 

CL0DCNT3 

CHAR!1) 

3E6 

CLTHIN 

FIXED!15) 

408 

CMAINSIZ 

FIXED(31) 

31C 

CMANMSG 

FIXED!31) 

324 

CMAXLIM 

FIXED!31) 

60C 

CMAXREC 

FIXED!31) 

404 

CMAXSIZE 

FIXED(31) 

3F4 

CMERGE 

PTR!31) 

5E5 

CMERGEIN 

BIT(1) 

6DC 

CMESSAGE 

CHAR!120) 

328 

CMINLIM 

FIXED(31) 

400 

CMINMAX 

BDY(WORD) 

40C 

CMINREC 

FIXED!31) 

40E 

CMINRECH 

FIXED!15) 

400 

CMINSIZE 

FIXED!31) 

4A6 

CMODCARD 

CHAR!1) 

7B0 

CMODDCB 

FIXED!31) 

410 

CMODEVAL 

FIXED!31) 

41F 

CMODNAME 

CHAR!3) 

418 

CMODSEND 

PTR!31) 

448 

CMODSLIB 

CHAR!8) 

414 

CMODSTM 

BDYCWORD) 

414 

CMODSTRT 

PTR!31) 

41C 

CMODULE 

CHAR!8) 

412 

CMODVALH 

FIXED!15) 

3FC 

CM0RETRK 

PTR!31) 

430 

CMOVEBR (3) 

PTR!16) 

436 

CMOVEBRI(3) 

PTR!16) 

178 

CMOVEEND 

PTR!31) 

442 

CM0VEE35I3) 

PTR!16) 

17C 

CMOVEH 

PTR!31) 

3 EC 

CM0VEKEYC3) 

PTR!16) 

454 

CMOVELNG 

FIXED!31) 

424 

CMOVERB (3) 

PTR!16) 

42A 

CMOVERBC! 3) 

PTR!16) 

43C 

CMOVERBI(3) 

PTR!16) 

7FA 

CMSGACNT 

FIXED!15) 

160 

CMSGADDR 

PTR!31) 

6F5 

CMSGBLNK 

CHAR!1) 

6F6 

CMSGINFO 

CHAR!94) 

4F4 

CMSGLIST (29) 

FIXED!31) 

6DF 

CMSGNO 

CHAR!3) 

330 

CMSGOPTN 

CHARI4) 

450 

CMSGTABL 

PTR!31) 

6E2 

CMSGTAG 

CHAR!1) 

3F8 

CMSGTYPE 

PTR!31) 

7E3 

CMULTVOL 

CHAR!1) 

494 

CNEWPAGE 

BIT!1) 

45C 

CNEXTWRK 

FIXED!31) 

496 

CNOREUSE 

BIT!1) 

458 

CNUMWORK 

FIXED!31) 

7E8 

COBSBLOK 

PTR!31) 

7D8 

COBSEXIN 

PTR!31) 

7E4 

COBSEXIT 

PTR!31) 

7DC 

COBSEXUT 

PTR!31) 

460 

COBSPACE 

FIXED!31) 

588 

COBUFFER 

PTR!31) 


R-PHASE CPU TIME 

E-PHASE ELAPSED TIME 

E-PHASE CPU TIME 

SPECIAL CLOCK 0 

SPECIAL CLOCK 1 

TABLE FOR VARIABLE GETMAIN 

LOAD COUNT PHASE 1 

LOAD COUNT PHASE 2 

LOAD COUNT PHASE 3 

INPUT RECORD LENGTH 

SIZE OF WORKING STORAGE 

PTR TO MSGTABLE FOR RESTORE 

MAX LIMIT FOR SIZE(MAX) 

MAXIMUM RECORD SIZE 

MAXIMUM SIZE WANTED 

ADDR. OF TRMERGE ROUTINE 

SORTINOl DD STMNT PRESENT 

MESSAGE AREA 

MIN VIRTUAL STRG FOR PEER 
PARMS FOR VARIABLE GETMAIN 
MINIMAL RECORD SIZE 
HALF-WORD 

MINIMUM SIZE ACCEPTED 

YES = MODS STMNT PRESENT 

MODSLIB DCB ADDRESS 

MODAL RECORD SIZE 

SIGNIFICANT PART OF MODNAME 

ENDING BYTE 

MODS LIBRARY NAME 

MODS STATEMENT - 

STARTING BYTE 

MOD TO BE CALLED 

HALF-WORD 

TRKS NOT TO RELEASE 
CCD MVC BUFFER TO RSA 
INDEX MVC BUFFER TO RSA 
WORK AREA FOR MOVECOMP 
MVC FOR USER RTN AT E35 
WORK AREA FOR MOVECOMP 
CTL WORD MVC OR BAL TO RTN 
BYTES TO MOVE TO RSA 
RCD MVC RSA TO BUFFER 
RCD MVC RSA TO BUFFER(C-PH) 
INDEX MVC RSA TO BUFFER 
COUNT OF ACTION MESSAGES 
ADDR. OF ROUTINE DIAGNOSE 
MESSAGE BLANK 
MESSAGE TEXT 
MSG VARIABLE INFO LIST 
MESSAGE NUMBER 
MESSAGE OPTION 
ADDR. ERROR MESSAGE TABLE 
MESSAGE TAG 

DEBUG MESSAGE TYPE INDEX 
MULTIVOLUME DATA SET FLAG 
NEW PAGE HAS BEEN TAKEN 
PRIM WORKD CHAIN 
VSAM OUTPUT NON-REUSABLE 
NUMBER OF WORK AREAS 
ADDRESS OF EXCP DATA CODE 
ADDRESS OF SORTIN OPEN EXIT 
EXCP OPEN EXIT ADDRESS 
ADDRESS OF SORTOUT -//- 
OUTPUT BFR SPACE 
ADDR OF OUTPUT INDEX BFR 
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DISP 
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ATTR 

39C 

COMLOC 


PTR(31) 

174 

COMLOCSV 


FIXED(31) 

4B0 

COMMB 


PTR(31) 

4B4 

COMMBEND 


PTR(31) 

178 

COMMDBLE 


BDY(DWORD) 

3A0 

COMSIZE 


FIXED(31) 

38C 

CONBLKSZ 


FIXED(15) 

496 

CONCHAIN 


BIT(l) 

4B8 

CONLRECL 


FIXED!15) 

497 

CONRECFM 


CHAR(l) 

494 

CONSW 


PTR(8) 

495 

CONSW1 


PTR(8) 

496 

C0NSW2 


PTR(8) 

5E5 

CONSW3 


PTR(8) 

496 

COPENCLS 


BIT(l) 

7F9 

COPENFL 


CHAR(l) 

464 

498 

COPSRTIN 

COPTIONS 


PTR(31) 

320 

COREPARM 


FIXED(31) 

321 

C0REPM24 


PTR(24) 

5B0 

COREUSED 


FIXED!31) 

5A0 

470 

C0RMSG39 

COUNTERS 


PTR(31) 

470 

COUNTERO 


FIXED(31) 

474 

C0UNTER1 


FIXED(31) 

478 

C0UNTER2 


FIXED(31) 

47C 

C0UNTER3 


FIXED!31) 

480 

C0UNTER4 


FIXED(31) 

484 

C0UNTER5 


FIXED(31) 

488 

C0UNTER6 


FIXED!31) 

48C 

COUNTER7 


FIXED!31) 

490 

COUNTERX 


FIXED!31) 

7A4 

COUNTERY 


FIXED(31) 

46C 

COUTLIM 


PTR!31) 

468 

COUTSIZE 


FIXED(31) 

4D0 

CPAGELIM 


PTR(31) 

4D4 

CPAGELOC 


PTR! 31) 

5A0 

CPAGERSA 


PTR!31) 

4AC 

CPAGESIZ 


PTR!31) 

4DC 

CPARCLC 

(3) 

PTR!16) 

495 

CPARMODE 


BIT Cl) 

4E2 

CPARMVC 

CPATCH 

(3) 

PTR!16) 
FIXED!31) 

5A4 

CPBUF1 


FIXED(31) 

4D8 

CPEERAGE 


FIXED!31) 

56C 

CPHASECG 


FIXED!31) 

578 

CPHASEEG 


FIXED!31) 

570 

CPHASEPG 


FIXED!31) 

574 

CPHASERG 


FIXED!31) 

57C 

CPHASEWK 


BDY(WORD) 

7A9 

CPHASLNK 


CHAR! 1) 

56B 

CPREGION 


CHAR!1) 

332 

CPRINMOD 


CHAR!1) 

5AC 

CPRMSIZ 


FIXED!31) 

5A8 

CPROTSIZ 


FIXED!31) 

4EA 

CPRT 


CHAR!129) 

4BC 

CPRTDECB(5) 

PTR!31) 

4EA 

CPRTHEAD 

(4) 

FIXED!15) 

4F2 

CPRTLINE 


CHAR!121) 

331 

CPRTRMOD 


CHAR!1) 

59C 

CPUTREC 


PTR!31) 

4BA 

CP0SIZE 


FIXED!15) 

14C 

CRALADDR 


PTR!31) 

5D4 

CRBUFFRS 


FIXED(16) 

5B0 

CREBUILD 


PTR!31) 


COMMENT 


GETMAINED CHAIN 
COREPARM SAVE FOR ICEDEV 
EXTRACT/RESTORE CODE AREA 
END OF EXTRACT/RESTORE AREA 
DOUBLEWORD-ALIGNED WORKAREA 
SIZE OF RETURNED STORAGE 
BLKSIZE OF 1-ST SORTIN FILE 
NO CHAIN SCHED FOR SORTOUT 


MISCELLANEOUS SWITCHES 

MISCELLANEOUS SWITCHES 

MISCELLANEOUS SWITCHES 

MISCELLANEOUS SWITCHES 

OP/CL SYSOUT IN PRSS 

PERFORM OPEN IN ICEOBS 

OPEN PTR USED IN DEF + CRE 

OPTION SWITCHES 

MAXIMUM ALLOWED 

FOR SORT/MERGE 

CORE USED FOR MSG 92/93 

CORE VALUE FOR MSG 39 (DEV) 

EVENT COUNTERS 

ENTRIES TO INOUTRTN 

ISSUED EXCPS 

RECORDS IN 

RECORDS OUT 

RECORDS INSERTED 

RECORDS DELETED 

SPECIAL COUNT 0 

SPECIAL COUNT 1 

TEMPORARY COUNT 1 

RECS DELETED BY E25 

ADDR. OF END OF WORK BUF 

SORTOUT LOGICAL RCD LENGTH 

END PTR TO UNPROT FIXD AREA 

ADDR. OF FIXED AREAS TABLE 

PTR TO END OF LAST BUFFDO 

PAGE SIZE FOR SYSTEM 

PAR INDEX BIN COMP 

PARTITION MODE SWITCH 

PAR INDEX BIN MOVE 

RESERVED 

INDEX POOL ADDR 

MIN. NO STRINGS ON SORTWK 

MAXIMUM G-VALUE - CREATION 

MAXIMUM G-VALUE-ELIMINATION 

MAXIMUM G-VALUE - PARTTION 

MAXIMUM G-VALUE - REDUCTION 

PHASE WORK AREA 

TO REMEMBER THAT WE LINK 

REGION IS CORE LIMIT 

Y = PRINT ALL MESSAGES 
PERM ALLOC SIZE 

PROT AREA SIZE 
(WORD 3) PRINT BUFFER 
PRINTER OUTPUT DECB 
VLR AND VLB INFORMATION 
(WORD 3) ' PRINTER OUTPUT 

Y = MESSAGES TO PRINTER 
ADDR. OF OUTPUT PUT ROUTINE 
PARTITION ZERO SIZE 

ADDR. OF ROUTINE RALLOCAT 
NUMBER OF R-PHASE BUFFERS 
REBUILD SPANNED RECORDS 
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5B8 

CRECADDR 

PTRT 31) 

5BC 

CRECAREA 

PTR(31) 

5C0 

CRECCTR 

FIXEDC31) 

3E8 

CRECFMIN 

CHAR(l) 

168 

CRECHAIN 

PTR( 31) 

5C4 

CRECORD 

FIXED(31) 

5CC 

CRECPBUF 

FIXEDT31) 

5C8 

CRECPTR 

PTR(31) 

5B4 

CRECSIZE 

FIXED(31) 

5D0 

CRECTBUF 

FIXEDT 31) 

5D7 

CRECTYPE 

PTR(8) 

343 

CRELSE 

CHART 1) 

342 

CRESDNT 

CHART 1) 

32C 

CRESERVE 

FIXEDT 31) 

5D8 

CRESPMTM 

PTRT31) 

5E0 

CRESTMP 

PTRT31) 

5DC 

CRESTORE 

PTRT31) 

5D6 

CRETCODE 

PTRT8) 

5E4 

CRLSE 

CHART 1) 

5E8 

CRMERGE 

FIXEDT 31) 

5 EC 

CRPLIN 

PTRT31) 

5F0 

CRPLOUT 

PTRT31) 

5F4 

CRSAFREE 

PTRT31) 

6D4 

CRSAFULL 

BITT1) 

32D 

CRSRVD24 

PTRT24) 

140- 

CRTNADDR 


0 48 

CSAVEL1 


090 

CSAVEL2 

PTRT31) 

0D8 

CSAVEL3 


000 

CSAVEOS 

PTRT31) 

690 

CSAVEPTR 

FIXEDT 31) 

7F4 

CSAVER14 

FIXEDT 31) 

610 

CSAVITTR 

PTRT31) 

388 

CSAVREG7 

FIXEDT 31) 

60C 

CSCANLOC 

PTRT31) 

344 

CSECALC 

CHART 1) 

684 

CSECALL 

CHART2) 

68C 

CSECTRK 

FIXEDT 31) 

4 A2 

CSEEKMOD 

CHART1) 

618 

CSELECT 

PTRT31) 

494 

CSFROMSW 

BITT1) 

495 

CSHORTSW 

BIT T 1) 

494 

CSKIP 

BITT1) 

608 

CSKIPREC 

FIXEDT31) 

609 

CSKIPR24 

PTRT24) 

34B 

CSMF 

CHART 1) 

600 

CSORTIN 

FIXEDT31) 

498 

CSORTNAM 

CHART4) 

604 

CSORTOUT 

FIXEDT31) 

61C 

CSORTWK 

PTRT31) 

5D7 

CSPANIN 

BITT1) 

5B8 

CSPNVSAM 

PTRT31) 

5E5 

CSRTCNTL 

BITT1) 

774 

CSRTMODS 

PTRT31) 

49C 

CSRTMRGE 

CHART 1) 

16C 

CSTAADDR 

PTRT31) 

34D 

CSTAE 

CHART 1) 

688 

CSTAESAV 

PTRT31) 

689 

CSTAES24 

PTRT24) 

6ED 

CSTEPNAM 

CHARTS) 

7E0 

CSTOPIN 

CHART1) 

7E1 

CSTOPOUT 

CHART!) 

494 

CSTOSW 

BIT T1) 

614 

CSTRINGS 

FIXEDT 31) 

798 

CSTWNAME 

CHART 12) 


ADDR. OF RECORD - FOR VSAM 

VLR PAD/RESTORE AREA 

RCD COUNT FOR CURRENT TRACK 

INPUT RECORD FORMAT 

ADDR. OF ROUTINE RECHAIN 

ADDR TO RECORD KEY 

RECORDS/BUFFER 

SPANNED REC PTR 

SIZE OF TRANSPOSED RECORD 

RCD/BUF XTREE ENTRY SIZEC4) 

RECORD TYPE 

Y=RELEASE WORKSPACE 

A=ALL M=MAN N=N0NE 

STORAGE 

PERM RES CH OR TEMP RES 
TEMP RESERVE CNT 
ADDR. OF RESTORE ROUTINE 
RETURN CODE AREA (0|10> 

YES FOR RELEASE OF SORTWK 
MERGE ORDER - REDUCTION 
ADDR OF VSAM INPUT RPL 
ADDR OF VSAM OUTPUT RPL 
ADDR. OF NEXT BIN IN RSA 
1=RSA IS FULL 
CALLING PROGRAM 
ADDR. OF PERMANENT RTNS 
LEVEL 1 ROUTINE SAVE AREA 
LEVEL 2 ROUTINE SAVE AREA 
LEVEL 3 ROUTINE SAVE AREA 
SUPERVISOR AND DM SAVE AREA 
SAVE AREA POINTER 
SAVE AREA IN ALL PHASES 
PREVIOUS INDEX BLOCK ITTR 
SAVE INPUT PTR TICELIM) 

ADDR. OF LAST SCAN LOCATION 
Y=AUTOM. SEC. ALLOC. 
SECONDARY ALLOCATION SWITCH 
SEC.ALLOC. TRK COUNTER 
YES = DO STAND-ALONE SEEKS 
ADDR. OF TSELECT ROUTINE 
FROM-REG IN RCD-MOVE SAVED 
SHORT VAR RECORD FOUND 
SKIP PHASES CONTROL SWITCH 
NUMBER OF RECORDS TO SKIP 
THREE BYTES 
S=SHORT SMF RECORD 
SORTIN DCB POINTER 
PREFIX FOR DD STATEMENTS 
SORTOUT DCB POINTER 
PTR TO SORTWK DCB LIST 
ON = VAR. SPANNED INPUT 

SORTCNTL STATEMENT PRESENT 
SORTMODS DCB POINTER 
SORT=TS> | MERGE=TM) 

ADDR OF INIT 5TAE 
Y = STAE WANTED AT ABEND 
STAE WORK AREA - 
FOR NEXT LEVEL 
STEP NAME 

CANT USE EXCP FOR SORTIN 
CANT USE EXCP FOR SORTOUT 
TO-REG IN RCD-MOVE SAVED 
STRING COUNT 
FOR STOW MACRO 
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DISP 

LABEL 

ATTR 

682 

CSUBPBAS 

FIXEDC15) 

680 

CSUBSIZE 

FIXEDC15) 

348 

CSVC 

PTR(16) 

49D 

CSYSDUMP 

CHART 1) 

5F8 

CSYSIN 

PTR(31) 

774 

CSYSLIN 

PTRC31) 

7B4 

CSYSLMOD 

FIXEDC 31) 

338 

CSYSNAME 

CHARC8) 

5FC 

CSYSOUT 

PTRC31) 

620 

CSYSOUTD 

PTRC31) 

694 

CSYSRES 

FIXEDC 31) 

4AB 

CSYSTEM 

CHART 1) 

788 

CTABPTR 

PTR(31) 

494 

CTECHNQS 

BITC1) 

4A9 

CTECHNQ 

CHAR(1 ) 

120 

CTEMP1 

FIXEDC 31) 

123 

CTEMP108 

PTRC8) 

122 

CTEMP115 

FIXEDC15) 

121 

CTEMP124 

PTR C 24) 

124 

CTEMP2 

FIXEDC 31) 

127 

CTEMP208 

PTRC8) 

126 

CTEMP215 

FIXEDC15) 

125 

CTEMP224 

PTR C 24) 

128 

CTEMP3 

FIXEDC 31) 

12B 

CTEMP308 

PTRC8) 

12A 

CTEMP315 

FIXEDC15) 

129 

CTEMP324 

PTRC24) 

12C 

CTEMP4 

FIXEDC 31) 

12F 

CTEMP408 

PTRC8) 

12E 

CTEMP415 

FIXEDC15) 

12D 

CTEMP424 

PTRC24) 

6B0 

CTESTKEY(3) 

PTRC16) 

IDO 

CTFCB 

FIXEDC 31) 

164 

CTIME 

PTRC31) 

358 

CTIOTIN 

PTRC31) 

59C 

CTIOTOUT 

PTRC31) 

6A8 

CTMP5IZ 

FIXEDC31) 

808 

CTOTTIME 

FIXEDC31) 

495 

CTPDYNSW 

BITC1) 

828 

CTRACE 

CHART 128) 

810 

CTREEBAS 

FIXEDC 31) 

69C 

CTREELOC 

PTR C 31) 

698 

CTREESIZ 

FIXEDC 31) 

6 AC 

CTREE2 

PTR(31) 

6A4 

CTRESHLD 

FIXEDC 31) 

158 

CTRKROUT 

PTRC31) 

6BC 

CURRDATE 

FIXEDC 31) 

6B8 

CURRDECB 

PTRC31) 

6C0 

CURREC 

PTRC31) 

6 AO 

CUTABENT 

PTRC31) 

5D7 

CVARREC 

BITC1) 

34C 

CVBLKSET 

CHART 1) 

6C4 

CVERACC 

FIXEDC 31) 

345 

CVERIFY 

CHART 1) 

6D4 

CVIM 

BITC1) 

340 

CVIO 

CHART 1) 

34E 

CVIOREC 

CHART 1) 

6D0 

CVMOVEL 

FIXEDC 31) 

6D4 

CVREMSW 

BITC8) 

6C8 

CWSAMERR 

PTRC31) 

6CC 

CVSAMRVE 

FIXEDC 31) 

496 

CVSAMR1 

BITC1) 

75C 

CWBPOOL 

FIXEDC 31) 

760 

CWBPOOLL 

FIXEDC15) 

762 

CWBPOOLC 

FIXEDC15) 


COMMENT 


SUB-BIN/BASE-BIN 

SUB-BIN SIZE 

SVC INSTRUCTION 

YES = SYSUDUMP OR SYSABEND 

SYSIN DCB POINTER 

SYSLIN DCB POINTER 

SYSLMOD DCB ADDRESS 

NAME FOR PRINT DD CARD 

SYSOUT DCB POINTER 

SYSOUT - DCB 

SYSTEM NEEDS 

0=MFT/MVT S=SVS M=MVS 

POINTER IN SCANTAB 

TECHNIQUE FORCED 

PIB|0 IX1N OR DEFAULT E 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

CLC FOR TWO CONTROL WORDS 
TFCB CHAIN HEAD 
ADDR. OF ROUTINE TIMING 
PTR TO INPUT DD NAME CDEF) 
PTR OUTPT DD NAME CDEF-DEG) 
TEMP ALLOC SIZE 
CPU TIME AREA FOR SMF 
NO DYNNUMB FOR TAPE 
TRACE TABLE 
TREE BASECODE ADDRESS 
ADDR. OF START OF TREE 
SIZE OF ALLOCATED TREE 
LOOK AHEAD TREE 
FREE BYTES IN RSA 
ADDR. OF ROUTINE TRKROUT 
CURRENT DATE - PACKED DEC. 
ADDR. OF CURRENT DECB 
ADDR TO BUFFERED REC IN RSA 
PTR/DISPL TO UNIT TAB ENTRY 
ON = VARIABLE LENGTH RECS 
N =BYPASS VLR-BLOCKSET 
ACCUMULATOR FOR VERIFY 
Y=VERIFY OUTPUT RECS 
1=BYPASS VED CALL VIM 
VIO UNDER MVS 
VIO OR TAPE REC 
VLR - NO OF BYTES TO MOVE 
ICEVRE MISC SWITCH 
ADDR OF MODULE ICEERR 
STORAGE RESEVED FOR VSAM 
VSAM RELEASE 1 IN SYSTEM 
WB-POOL ADDRESS 
WRITEBACK POOL SIZE 
CURRENT POOL SIZE 
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DISP LABEL ATTR COMMENT 


764 

CWBPOOLR 

FIXEDC15) 

5E5 

CWKVAMDS 

BITCl) 

6D6 

CWMINCON 

FIXED<15) 

766 

CWMINREC 

FIXEDC15) 

758 

CWORKQ 

PTRC31) 

120 

CWORK1 

FIXEDC31) 

123 

CWORK108 

PTRC8) 

122 

CW0RK116 

FIXEDC16) 

121 

CW0RK124 

PTRC24) 

124 

CWORK2 

FIXED< 31) 

127 

CW0RK208 

PTRC8) 

126 

CWORK216 

FIXED(16) 

125 

CW0RK224 

PTRC24) 

128 

CWORK3 

FIXEDC31) 

12B 

CWORK308 

PTRC8) 

12A 

CWORK316 

FIXEDC16) 

129 

CW0RK324 

PTRC24) 

12C 

CWORK4 

FIXEDC 31) 

12F 

CW0RK408 

PTRC8) 

12E 

CW0RK416 

FIXEDC16) 

12D 

CW0RK424 

PTRC24) 

130 

CW0RK5 

FIXEDC 31) 

134 

CW0RK6 

FIXEDC 31) 

138 

CW0RK7 

FIXEDC31) 

13C 

CW0RK8 

FIXEDC 31) 

6D5 

CWRKTYPE 

CHARC1) 

6D8 

CWTO 

BDYCWORD) 

178 

CXCCOUNT 

FIXEDC31) 

17C 

CXCLN6 

FIXEDC 31) 

170 

CXLIST 

PTRC31) 

800 

CXTRSTAT 

PTRC31) 

7B8 

CZONE61 

CHARC32) 


OFFSET TO RESERVE BLOCK 

VIO WORK DATASET PRESENT 

CTRL FIELD BASED MIN RECLEN 

MIN EXTRACT IN NON-PEER 

ADDRESS OF WORK AREA QUEUE 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

WORK AREA 

T=TAPE D=DISK 

WTO - MF=L 

WORK AREA FOR EXTRACT 
WORK AREA FOR EXTRACT 
ADDRESS OF EXIT LIST 
SMF STATISTICS RTN PTR 

INTERM. STOR. F. ZD M. E6I 


217 





Licensed Material—Property of IBM 

Page of LY33-8042-6, As Updated 31 March 1981, By TNL LN20-9345 

Appendix A: Program Exits 


Calling Modules 


--T-“T- 

1 Disk | Tape |Merge 


i 


— 

— 

-T- 

T- 

~T - 

- r - 

— 

— 

— 




— 

*4 


1 

|Exit| 

BLOC 

|PEER 1 VALE 

I CRCX 

I BALN 

OSCL 

! POLY 

1 BALN 


-only 

1 

1 

i 

FLR VLR 

1 

1 

| fix 

var 

| fix 

var 

fix 

var 

] fix 

var 

] fix 

var 

I 

1 

|- 


— 

— 

4- 

4- 

-f- 


4- 


— 


-4- 


-+- 


-4- 

-J 

|PhO 

i 



1 

1 

1 


1 




J 


] 


I 



| El 8 

i 

- 

- 

|DED 

|DED 

1 - 

- 


- 

- 

- 

1 - 

- 

1 - 

- 

1 

- 


|E39 

i 

- 

- 

|DED 

|DED 

1 - 

- 

1 - 

- 

- 

- 

1 - 

- 

1 - 

- 

1 

- 


1_ 

1 



,1__ 

1 

j._ 


.4-_ 


L_„ 






•4- 


“4 

1 

T 



T 

T 



T- 




t- 


1- 



j Phi 

i 



1 

1 

i 


l 




1 


I 


1 


| El 1 

i 


- 


j VRE’ 

| APL 

APL 

| APG 

APG 

APL 

APL 

j APG 

APG 

J APG 

APG 

1 

- 


| El 5 

i 

E15 2 

15V° 

| CRE 

| VRE’ 

j RDR 

RDS 

j RDD 

RDE 

RDR 

RDS 

j RDD 

RDE 

JRDD 

RDE 

1 

- 


| El 6 

i 

- 

- 

1 ~ 

| VRE’ 

j RDR 

RDS 

j RDD 

RDE 

RDR 

RDS 

j RDD 

RDE 

|RDD 

RDE 

1 

- 


| El 7 

i 

- 


| ' 

| VRE 3 

| 8PM 

8 PM 

j RPC 

RPC 

RPM 

RPM 

| RPC 

RPC 

| RPC 

RPC 

1 

- 


I El 8 

i 

- 


| - 

| VRE 3 

| 9GN 

9GN 

| AGI 

AGI 

AGN 

AGN 

| AGA 

AGA 

| AGA 

AGA 

1 

- 


| El 9 

i 

- 

- 

j - 

| VRE 

| 9GN 

9GN 

| AGI 

AGI 

AGN 

AGN 

| AGA 

AGA 

|AGA 

AGA 

1 

- 


1E31 

i 

- 

- 

j - 

j VRO 

1 * 

- 

j - 


- 

- 

l - 

- 

1 - 

- 

1 

- 


IE35 

i 

- 

- 

|CRO 

| VRE 

1 ~ 

- 

| “ 

- 

- 

- 

1 * 

- 

1 - 

- 

1 



| E37 

i 

- 

- 

j “ 

j VRO 

1 - 

- 

j - 

- 

- 


1 - 

- 

1 ~ 

- 

1 

- 


JE39 

i 

- 

- 

1 “ 

I VRO 

1 " 

- 

j - 

- 

- 

- 

1 - 

- 

1 " 

- 

1 

- 


1 E61 

i 

- 

- 

|CRE 

| VRE’ 

|ROB 

ROD 

| ROB 

ROD 

ROB 

ROD 

|ROF 

ROH 

] ROB 

ROD 

1 

- 


1_ 

| 




J. 



| 


__ 


.x„„ 


-X— — 


1 

, 

-4 

n 

T 



T- 

T 



T-- 




T 


7-- 


T 


I Ph2 

1 



1 

l 

1 


i 




l 


1 


1 



| E31 

1 

- 

- 


| VED 

| APL 

APL 

1 APH 

APH 

APL 

APL 

j APH 

APH 

| APH 

APH 

1 

- 


| E25 

1 

~ 

- 

| - 

| VEE 

| RBH 

RBX 

j RBJ 

RBK 

RBH 

REX 

j RBJ 

RBK 

j RBJ 

RBK 

1 

- 


| E27 

1 

- 

- 

j “ 

j VED 

j 8PM 

8 PM 

| RPF 

RPF 

RPM 

RPM 

j RPF 

RPF 

JRPF 

RPF 

1 



| E28 

1 

- 

- 

j - 

1 - 

| 9GN 

9GN 

1 AG J 

AGJ 

AGN 

AGN 

|AGG 

AGG 

] AGG 

AGG 

1 



| E29 

1 

- 

- 

j - 

1 " 

| 9GN 

9GN 

| AG J 

AGJ 

AGN 

AGN 

| AGG 

AGG 

|AGG 

AGG 

1 

- 


| E61 

1 

- 

- 

j - 

j VEE 

|ROQ 

ROQ 

I ROQ 

ROQ 

ROQ 

ROQ 

I ROQ 

ROQ 

] ROQ 

ROQ 

1 











.L 


__ 


_ 


,± _ 


j 


-4 

r— 

1 ' 







r- 




T 


T- 


T 


|Ph3 

1 

- 

- 

1 

1 

i 


i 




1 


1 


l 



| E31 

| 

- 

- ■ 


j VIP 

| API 

API 

| API 

API 

API 

API 

j API 

API 

[API 

API 

I 

API 


| E32 

1 

- 

- 

1 - 

1 - 

i - 

- 

j “ 

- 


- 

! - 

- 

1 - 

- 

l 

RDU 


|E35 

I 

E35* 1 

35VLILIM*1 VIM 

|RBM 

RBO e 

j RBM 

RBO® 

RBM 

REO« 

5 |RBM 

RBO®|RBM 

RBO® 

I 

RBM 7 


|E37 

1 

- 

_ 

| - 

j VIM 

| RPG 

RPG 

| RPG 

RPG 

RPG 

RPG 

j RPG 

RPG 

| RPG 

RPG 

l 

RPG 


|E38 

| 

- 

- 

I - 

I " 

j AGK 

AGK 

| AGK 

AGK 

APK 

APK 

| APK 

APK 

| APK 

APK 

l 

APF 


|E39 

| 

_ 


|LIM 

|VIP 

|AGK 

AGK 

| AGK 

AGK 

APK 

APK 

| APK 

APK 

| APK 

APK 

l 

APF 


|E61 

| 

- 

_ 

| - 

I - 

|ROQ 

ROQ 

1 ROQ 

ROQ 

ROQ 

ROQ 

1 ROQ 

ROQ 

|ROQ 

ROQ 

l 

ROQ 












1_ 


I 


1 


.J__ 


1---- " 


’Or VRN 

a Or IPUM if no SORTIN 
3 0r VRN or VRQ 
“Or COBU if no SORTOUT 
“Of LIV 

®8BO for spanned records 

7 RBO for variable-length records 

“Or COBV if no SORTIN 


218 



























Licensed Material—Property of IBM 


Register Usage 


The general registers used by the sort/merge program for linkage and 
communication of parameters follow operating system conventions. 

Register 1 is used to pass the address of a parameter list to the called 
routine. 

Register 13 contains the address of an area set aside by the sort/merge 
program, in which a user routine may save the contents of registers. 

Register 14 contains the address of the sort/inerge program return point. 

Register 15 contains the address of the user routine. It is also used 
by the user routine as a return code register to communicate information 
to the sort/merge program. 


Appendix A. Program Exits 
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Appendix B: Format Codes (Conventional Techniques) 


With a conventional sort or merge each node in the tree contains a code 
describing the current status of the node. 

The structure of a node, and the various format codes as they appear in 
the second word of that node, are described below. 

For fixed-length records the node consists of five words. The first 
word contains the address of the next-level node with which records 
associated with the current-level node are compared. In other words, 
the first-level node points to the second-level node, which points to 
the third-level node, etc. 

The second word contains the format code. This code is a number that is 
used as a displacement value to index a branch table in the ordering 
module. The entries in the branch table reflect the sequence (old or 
new) to which each record at a node belongs. This knowledge precludes 
needless compares and facilitates the updating of a node after the 
position of a new record is determined. 

The last three words refer to the actual addresses of the three records 
in the RSA. A binary compare is made to determine which word in the 
node is to receive which RSA address. If the user specifies ascending 
sequence, the address of the record with the smallest control field is 
placed into the first word, the address of the record with the largest 
control field is placed into the third word, and the address of the 
record with the control field that collates in the middle is placed into 
the second word. For descending sequences the order is reversed. 

For variable-length records, the node consists of only three words. The 
first two words contain the next-level node address and format code and 
are functionally similar to the fixed-length record node described 
above. 

Because of the complexity of address structuring in the variable-length 
record format, only one record is referred to in the RSA. Bence, only 
one word is required in the node for this purpose. Functionally, 
however, the word is similar to that in the fixed-length record node. 
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Fixed-Length Records 


The format codes for fixed-length records are interpreted as follows: 
-tr- 


Code 

I-4 

0 

I- + 

16 


~4 


Meaning 

No record addresses in node. 


An event has occurred: flushing completed, winner obtained, or 
new string started. This is a program node, as opposed to a 
tree node. 


1 32 

1 

| 

One address in the node. Record is for new sequence. 

1— 

| 48 

i. 

T 

1 

I 

One address in the node. Record is for same 

sequence. 

r 

| 64 
| 

—r 

1 

i 

Two addresses in the node. 

Both records for 

new sequence. 

i 80 

1 

L 

T 

1 

1 

1 

Two addresses in the node, 
record for same sequence. 

One record for new sequence, and one 

1- 

| 96 

1 

—r 

1 

f 

Two addresses in the node. 

Both records for 

same sequence. 

1112 

T 

1 

■ 

Three addresses in the node. 

All records for 

new sequence. 

J128 

1 

1 

T 

1 

| 

Three addresses in the node, 
record for same sequence. 

Two records for 

new sequence, one 

1144 

1 

j.. .... 

—r 

1 

1 

1 

Three addresses in the node, 
record for new sequence. 

Two records for 

same sequence, one 

1160 
i_ 

T 

1 

.i. 

Three addresses in the node. 

All records for 

same sequence.. 


Variable-Length Records 


For variable-length records, a slight difference occurs in the format 
codes because only one record address is entered in each node. The 
various codes and their meanings are as follows: 


(Code | Meaning | 

I 0 j no record address in the node. I 

j 16 j An event has occurred: flushing completed, winner obtained, or j 

j I new string started. This is a program node, as opposed to a j 

j j tree node. j 

I 32 j Describes the status of the node (see program listing for j 

j j details) . j 

| 48 j Record address in the node is for a new sequence. | 

j 64 j Describes the status of the node (see program listing for j 

j j details) . j 

| 80 j Record address in the node is for the same sequence. | 


i_-_a. 


.a 
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FORMAT CONDITION CODES 


The format code determines the point of entry into the instruction 
sequence. When the instruction sequence is entered, one of four 
condition codes exists. These condition codes dictate the final 
disposition of the record and are as follows: 


jCondition 

1 --— 

j Flush 

j-— 

| Fill 

I--- 

| Same 

| ——— - 

I New 

L__ 




Interpretation 


Forces records from the tree. 
Continue filling the tree. 



Record is of same sequence as previous records 
Record begins a new sequence 


Example : Fixed-Length Records 


The examples below will aid in interpreting the listings for 
fixed-length records. The character to the left of the slash represents 
the record entering the node, and the three characters to the right of 
the slash represent the records already in the node. Hence, in the 
program listing, when the comments contain a statement 'This case 
handles an x/xxx situation*, it can be resolved as follows: 


Condition 

I- 

s/sss 

I- 

N/SSS 


-/SSS 

|-- 

N/SSN 


-+ 


I-“— 

-/NNN 

1- 

-/SS- 

H 


-f 


N/S-- 




Interpretation 


I 

H 

New record is of same sequence as three previous records. 

New record begins new sequence; previous three records of 
same sequence. 

Records in tree are of the same sequence, and the program 
is in flush mode. 

Two sequential records, one new sequence in node. New 
sequence record entering. 

Flush mode; all records of new sequence to be flushed. 
Flush mode; two records of same sequence to be flushed. 


One record in the node is of the same sequence; new record 
begins a new sequence. 

...j 
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Example : Variable-Length Records 


For variable-length records, the listings may be interpreted as 
explained below. The two characters to the left of the slash represent 
the record entering the node and the two characters to the right of the 
slash represent the record already in the node. 


jCondition 

I—-——- 

| S1/S1 

}—- 

| T1/S1 


Interpretation 

New record is of same sequence as previous record. 


— 

I 

—i 

I 

- 4 


I 


| T2/S1 

I 


-+ 


I- 

| S2/S2 

I 


Record in node is of the same sequence as others in tree 
Set status of node to reflect this condition. 

Record in node is of the same sequence. New record will 
change sequence. Set status of node to reflect change. 


H 

Record in node is of new sequence. New record is also for 
new sequence. 

Record in node is for new sequence. Set node status to 
temporary new sequence record. 


I-— 

| T2/S2 

I 

| T2/T1 

I 


Set node status at temporary before next record is 
introduced. 
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Appendix C. Checkpoint/Restart Facility 


If it is included at system generation the sort/merge program may ma>e 
use of the Checkpoint/Restart Facility of the operating system. The 
user directs the sort/merge program to use this facility by (1) 
including the checkpoint parameter (CKPT) in the SORT or MERGE control 
statement, and (2) providing a SORTCKPT DD statement to define the 
checkpoint data set; this data set will store the information needed to 
restart processing. 

| Checkpoint procedures are described below for Peerage and Vale, and for 
j the conventional sort/merge techniques. 

| With Blockset checkpoints are not taken. If a checkpoint has been 
j requested the Blockset technique is rejected and another used instead. 


Sorting Application (Peerage and Vale) 


If checkpoints are requested, the checkpoint macro (CHKPT) is issued and 
checkpoint records are written on the checkpoint data set as follows: 

• ICECKP/ICEVED start of intermediate merge phase 

• ICEVIM start of final merge phase 

• when the checkpoint track pool is empty. 

The relative track addresses of 20-30% (maximum 1364 tracks) of the 
tracks primarily allocated to the intermediate work files are saved in a 
track pool. Every time a track of blocks has been read, the relative 
address is saved in the track pool. When the blocks have to be written 
the address of an unused track is found in the track pool. A checkpoint 
is taken when there are no more unused tracks. After the checkpoint has 
been taken, the saved tracks are available for use again. 


224 



Licensed Material—Property of IBM 


Sorting Application (Conventional Techniques) 


If checkpoints are requested the following modules link to module 
ICECHK. This issues checkpoint macro instruction (CHKPT) , which causes 
checkpoint records to be written on the checkpoint data set. 


• ICEAPC Start of phase 1 (all techniques) 

• ICEAPJ Start of phase 2 (all techniques except crisscross and 

oscillating) 

Start of each intermediate merge phase pass (balanced direct 
access technique) 

• ICERON During phase 2 (oscillating technique) 

• ICEROS During phase 2 (polyphase technique) 

• ICEROT During phase 2 (balanced DASD technique) 

• ICEAGH Start of phase 3 (all techniques) 

The program can be restarted from the checkpoint taken at the start of 
the sort phase, or from the last checkpoint taken. 


Marge-Only Application 


If checkpoints are requested they are taken whenever an end-of-volume 
condition occurs on SORTOUT, unless the user provides his own exit list 
address for the SORTOUT DCB. Module ICEAPF inserts the address of the 
checkpoint module ICE8CR in the DCBEXLST field when it generates the 
SORTOUT DCB (unless this field has been set by a user routine at exit 
E39) . Module ICE8CR is thus entered at the DCB exit list, which 
contains only the end-of-volume entry. This entry points to the EOV 
exit routine in this module, which in turn issues a checkpoint macro 
instruction (CHKPT), and then returns to the IOCS. 
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Appendix D. Program Listing Standards and Conventions 


To facilitate the identification of modules, work areas, tables, and 
other aspects of the sort/merge program listing, each technique assigns 
| symbolic names according to a pattern. 


Blockset 

MODULE NAMES 

| The format of all module names except ICEMAN and ICEAM1 is ICEmod, 
where: 

ICE is the identification for program modules 

mod is a descriptive name for the module (four characters) 


INSTRUCTION NAMES 


| Descriptive names are used. All variables, which are resident in 
I COMMON, begin with the characters 'COM*. 


CONSTANT NAMES 


( Descriptive names are used. 'Constant* is used to mean any item of data 
| defined outside COMMON which is not dynamic (i.e. based on a pointer) . 


WORK AREA NAMES 

| Since the program is reenterable, all work areas are variables, and are 
I thus resident in COMMON 


Peerage and Vale 

MODULE NAMES 


| The format of all module names is ICEmod, as described under 'Blockset* 
j above. The descriptive portion (mod) is 3 characters long. 
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INSTRUCTION NAMES 


Descriptive names are used. All variables, which are resident in 
ICECOMMA, begin with the character *C'. 


CONSTANT NAMES 


Descriptive names are used. 'Constant* is used to mean any item of data 
defined outside ICECOMMA which is not dynamic <i.e. based on a pointer) . 


WORK AREA NAMES 


Since the program is reenterable, all work areas are variables, and are 
thus resident in ICECOMMA. 


Conventional Techniques 

MODULE NAMES 


| The format of module names is ICEtmm, where: 

ICE is the identification for program modules. 

t, in general, is either an *A* for an Assignment or an *R* for a 
Running type module; however, for some assignment modules associated 
with the crisscross technique, t is *9', and for some running modules 
associated with the crisscross technique, t is *8*. 

nun is the unique portion of the module name. 


INSTRUCTION NAMES 


The format of all internal type instruction names is mmnnnnno or 
mmmnnnno where: 

mm or mmm represents the last two or three characters of the module 
name. 

nnnnn or nnnn is a unique designation assigned by the programmer and may 
be from one to five characters. 

o is an 'X* if the label is externally used; otherwise it can be used as 
another n. 
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Appendix E: SMF Record DSECT (ICESMF) 

This area is allocated and filled in by ICEEXIO, ICEOXOV, or ICEMOS 
depending on the sort technique used. The record is passed to sort's 
SVC routine, ICEFIXM (0S/VS2) or ICEFIX (OS/VS1). The SVC routine 
uses the passed record and issues the SMF macro to write the SMF 
record out to the SMF data set, upon successful completion of the 
sort/merge application. 


DISP 

NAME 




DESCRIPTION 

0000 

ICESMF 

DSECT 




0000 

ICERDW 

DS 

XL4 


RECORD DESCRIPTOR UORD 

0004 

ICESIND 

DS 

B 


SYSTEM INDICATOR 


X 




BIT0: SUBSYSTEM ID FOLLOWS SYSTEM ID 

0005 

ICERTYP 

DS 

X 


SMF RECORD TYPE. (16) 

0006 

ICEBTIME 

DS 

FL4 


TIME RECORD WAS MOVED TO SMF BUFFER 

000 A 

ICEBDATE 

DS 

PL4 


DATE RECORD WAS MOVED TO SMF BUFFER 

000E 

ICESID 

DS 

CL4 


SYSTEM IDENTIFICATION 

0012 

ICEJOBNM 

DS 

CL8 


JOBNAME 

001A 

ICERST 

DS 

FL4 


TIME READER RECOGNIZED JOBCARD 

001E 

ICERDS 

DS 

PL4 


DATE READER RECOGNIZED JOBCARD 

0022 

ICEUIF 

DS 

CL8 


USER ID (TAKEN FROM COMMON EXIT 


X 




PARAMETER AREA) 

002A 

ICESTN 

DS 

XL1 


STEP NUMBER 

002B 

ICERES1 

DS 

CL3 


RESERVED 

002E 

ICESUBID 

DS 

CL4 


SUBSYSTEM ID 

0032 

ICERSUB 

DS 

XL2 


RECORD SUBTYPE 


ICERSUBS EQU 

X 1 

01 

» SHORT RECORD 


ICERSUBF EQU 

X’ 

02 

’ FULL RECORD 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


X SELF DEFINING 

SECTION * 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

0034 

ICEPR0D 

DS 

F 


OFFSET TO PRODUCT SECTION 

0038 

ICEPRODL 

DS 

H 


PRODUCT SECTION LENGTH (10) 

003A 

I.CEPRODN 

DS 

H 


NUMBER OF PRODUCT SECTIONS (1) 

003C 

ICEDATA 

DS 

F 


OFFSET TO SECTION COMMON TO SHORT AND FULL RECS 

0040 

ICEDATAL 

DS 

H 


DATA SECTION LENGTH (46) 

0042 

ICEDATAN 

DS 

H 


NUMBER OF DATA SECTIONS (1) 

0044 

ICESTAT 

DS 

F 


OFFSET TO RECORD LENGTH STATISTICS 

0048 

ICESTATL 

DS 

H 


STATISTICS SECTION LENGTH (64) 

004A 

ICESTATN 

DS 

H 


NUMBER OF DATA SECTIONS (11 0) 


XXXXXXXKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


x PRODUCT SECTION 

X 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

004C 

ICERECV 

DS 

CL2 


RECORD VERSION. '50* FOR RELEASE 5.0 

004E 

ICEPRDCT 

DS 

CL8 


PRODUCT NAME. '5740-SM1' 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXXXXXXXX 


* DATA SECTION. 

COMMON PART x 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

0056 

ICECDAT 

DS 

OH 


START OF DATA SECTION 

0056 

ICERES2 

DS 

CL2 


TO PUT NEXT FIELD ON FULLWORD BOUNDRY 

0058 

ICESTPNM 

DS 

CL8 


STEPNAME 

0060 

ICERCDS 

DS 

F 


NUMBER OF RECORDS SORTED 

0064 

ICEBYTES 

DS 

F 


NUMBER OF BYTES SORTED (SUM OF RECORD LENGTHS) 

0068 

ICECPUT 

DS 

F 


SORT CPU TIME, HUNDREDTHS OF A SECOND 

006C 

ICELEN 

DS 

H 


SPECIFIED RECORD LENGTH 

006 E 

ICEIBLK 

DS 

H 


INPUT BLOCKSIZE (MAX) 

0070 

ICEOBLK 

DS 

H 


OUTPUT BLOCKSIZE 

0072 

ICEKEYLN 

DS 

H 


TOTAL CONTROL FIELD LENGTH (NUMBER 


K 




OF BYTES ACTUALLY COMPARED BY SORT) 
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DISP NAME 


DESCRIPTION 


0074 

0078 


0079 

007A 


ICEWBLK DS F NUMBER OF WORK DATA SET TRACKS USED 

ICEFLBYT DS B BIT 0: RESERVED 

x BIT 1-2: =FIXED LENGTH RECORDS 

x 01-VARIABLE LENGTH RECORDS 

x 10=VARIABLE LENGTH SPANNED RECORD 

* BIT 3-4: =BLOCKSET 


x 01=PEERAGE 
* 10=VALE 
x 11 CONVENTIONAL 
X 

x 

ICENDYNA DS AL1 

x 

ICERES3 DS CL2 


AND MERGE TECHNIQUES 
BIT 5*- 'l'B IF SORT 
BIT 6-7: RESERVED 
NUMBER OF DYNAMICALLY 
ALLOCATED WORK DATA 
RESERVED 


DYNAMICALLY INVOKED 


SETS 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


X DATA SECTION. STATISTICS PART x 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXXXXXXX 


ICEVAR EQU ICECTR BEGINNING OF VARIABLE PART 


007C 

ICECTR DS 

16F 

RECORD COUNTERS FOR 

INTERVALS 

00BC 

ORG 

ICECTR 





007C 

ICECTR01 DS 

F 

RECORDS 

IN 

INTERVAL 

1 

0080 

ICECTR02 DS 

F 

RECORDS 

IN 

INTERVAL 

2 

0084 

ICECTR03 DS 

F 

RECORDS 

IN 

INTERVAL 

3 

0088 

ICECTR04 DS 

F 

RECORDS 

IN 

INTERVAL 

4 

008C 

ICECTR05 DS 

F 

RECORDS 

IN 

INTERVAL 

5 

0090 

ICECTR06 DS 

F 

RECORDS 

IN 

INTERVAL 

6 

0094 

ICECTR07 DS 

F 

RECORDS 

IN 

INTERVAL 

7 

0098 

ICECTR08 DS 

F 

RECORDS 

IN 

INTERVAL 

8 

009C 

ICECTR09 DS 

F 

RECORDS 

IN 

INTERVAL 

9 

00 A0 

ICECTR10 DS 

F 

RECORDS 

IN 

INTERVAL 

10 

OOA4 

ICECTR11 DS 

F 

RECORDS 

IN 

INTERVAL 

11 

00A8 

ICECTR12 DS 

F 

RECORDS 

IN 

INTERVAL 

12 

00AC 

ICECTR13 DS 

F 

RECORDS 

IN 

INTERVAL 

13 

00B0 

ICECTR14 DS 

F 

RECORDS 

IN 

INTERVAL 

14 

00B4 

ICECTR15 DS 

F 

RECORDS 

IN 

INTERVAL 

15 

OOB8 

ICECTR16 DS 

F 

RECORDS 

IN 

INTERVAL 

16 


ICESMFND EQU 

X 

END OF RECORD 



END 


228.2 





Licensed Material—Property of IBM 
Page of LY33-8042-6, As Updated 31 March 1981, By TNL LN20-9345 

Index 


A 


abbreviations used (MO diagrams) 11 
ABEND 172 
ABEND dumps 177 

access method (see BSAM, QSAM, VSAM) 
adding 

temporary change maintenance area 164 
address 

of DCB table (see PPI index) 
of disk directory (see PPI index) 
of GETMAIN tables (see PPI index) 
of IOB tables (see PPI index) 
of unit count table (see PPI index) 
node 221 

all other techniques 191 
alphabetically names 111 
ALTSEQ statement 5 
AMASPZAP 164 
APAR 163 
assembler language 

initiating from 5-6 
assignment modules, list of 
ATTACH 5 

example 6 


B 


B (sort blocking) (see PPI index) 
balanced disk technique 

distribution sequence 77,79 
balanced tape technique 

distribution sequence 77,79 
BALN 173 
Blockset 90 

conditions for use 2.1 
directory 109 
layout 104 
module names 226 
modules 92 
object modules 109 
technique 190,89,103 
blocking (see PPI index) 

BSAM 1,172 
BUFFER 172 

size (see PPI index) 
bypass 


c 


calling modules 218 
capacity exceeded 71 
checkpoint/restart 1 
facility 224 
CLOCK 

(only Peerage/Vale) 174 
COBOL 5 


codes 

format 222 
collation 219 
COMMA 10 
COMMON 10 
communiaction areas 
Blockset technique 
(see COMMON) 

conventional techniques 
(see CPI, PPI) 

Peerage and Vale techniques 
(see COMMA) 

COMTRACE 178 

contents of a specially formatted dump 188 
control blocks 168 
conventional technique 
module names 227 
modules 94 

conventional techniques 89 
sorting application 2 
condition codes format 222 
considering located error 161 
constant names 226 
control fields 222-223 
word 222-223 
CPI 10 

creation of 22 
CRCX 173,89 

(see crisscross technique) 
crisscross technique 

distribution sequence 77,79 
criteria for disk techniques 3 
cross-reference tables 196 
CPI-PPI 196 
COMMON, Blockset 204 
COMMA, Peerage/Vale 209 
CSECTS 

name 112 
list of 113 

Blockset technique 109 

Peerage/Vale 111 
conventional techniques 113 
CTRACE 178 
CTRx 174 


D 


data 

areas 9 (see also COMMON, COMMA, 

CPI, PPI) 
sets 8 

DCB table address (see PPI index) 

DD statements 19 
deactivation 7 
DEBUG statement 5,172 
control statement 172 
debugging aids 159 

defaults assumed for program options 157 
defaults, generated 157 
defining problem cause 159 
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definition phase (see Phase 0) 
diagnostic messages 177 
direct access technique 

(see balanced disk technique 
and crisscross disk technique) 
directories 109 
directory 

of Blockset technique 109 
of conventional techniques 112 

of Peerage/Vale techniques 111 

disk devices 1 

disk directory address (see PPI index) 
disk sort techniques 2 
dump 172 

specially formatted 187 
dump Peerage 169 
dump Vale 169 
dumps 178 


E 


END index 41 
END statement 5 

equals routines (multiple compare) 12 
error 

conditions 85 
messages 193-195 
eight-byte module name 190 
event table 

Blockset 180 
Peerage/Vale 184 
EXCP 1 

EXEC statement 5 
exit name table 21,71 
exits 4,5 

calling modules 218 
register usage 219 
El 5 routine 6 
E35 routine 6 


F 


facility 

checkpoint/restart 224 
Fibonacci numbers 77 
file size 19 (see also PPI index) 
final merge phase (see Phase 3) 91 

finding 

object module in storage dump 190 
fixed-length records 
format codes 221 
FLAG 

(only Peerage/Vale) 174 
FLR-Blockset 

conditions for use 2.2 
directory of object modules 109 
load module interface 86 
modules 94 

forcing specially formatted dump 187 
format 

codes 221 

condition codes 222 
event record 178 
of dumps 178 


formatted dump 
contents 188 
interpreting 189 


G 


G (numbers* of records in RSA) 

(see PPI index) 
general register 219 
generated defaults 157 
GETMAIN 71,79,83 

tables, addresses (see PPI index) 


H 


hash table 47 

high index (see end index) 

HMASPZAP 165 


I 


ICEAM1 88 

ICECRE 90 

ICEIPUT 85 

ICEMESI 85 

ICEMESO 85 

ICEMON 85,90 

ICEPAR 90 

ICERCB 85 

ICERCV 85 

ICERED 90 

IMASPZAP 165 

instruction names 226 

interpreting formatted dump 189 

index 

creation of 41 
queue 51,53,55 
size 19 

sorting 43,45,47 
information areas 

conventional techniques (see CPI,PPI) 
initializing the 
tree 65 
program 17,21 
initiating the program 5-6 
input 

oin size (see PPI index) 
input/output 

intermediate storage 1 
recovery management support 1 
interface of load modules 85 
intermediate storage 
I/O operations 1 

IOB tables, address (see PPI index) 

ITT (see index format) 
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Libraries 
system 7 
private 8 
LINK 3 

linkage editor 1 , 21 

parameter list for 22 
LIST 109 
load module 

Blockset technique 94 
conventional technique 96 
interface 86 
Peerage technique 92 
structure 91 
Vale technique 93 
locating 

control blocks 171 
SORTWK control blocks in a dump 171 
logical 

block 41 
strings 41 

low index (see start index) 41 



M (merge order) 21 

(see also PPI index) 


macro 

used to initiate the program 5-6 
main storage 7 
available 21 
layout 105-108 
requirements 7 
map index (see mapping) 
map of PPI 142 
map of data areas (see 
COMMON, COMMA, PPI) 
mapping indexes 47 
maximum M 90 

diagrams 14-84 
MAXLIM 7 

MERGE statement 5 
MERGE only application 225 
merging technique 225 
messages 

cross-reference tables 192 
origin of 191 
messages produced using 

DEBUG control statement 1 
DIAG option 176 
method of operation 10-84 
michrofiche 

entry into 10 
load module ICEMESI 164 
numbering 11 
organization 164 


MO diagram 112 
MO diagrams 14-84 
how to use 10 
MODS 85 

MODS statement 5 
module 

Blockset 94 
conventional 96 
interface 85-88 
Peerage 92 

tables, how to use 12 
Vale 93 

module interface 85 
module name 190,226 
multiple compare routine 12 
multiple console support 1 



names alphabetic 111 
network table 83 
NOABEND 173 
NODUMP 173 

object module in 

a dump start 190 
storage dump 190 

operating system, relationship to 1 
operational 

considerations 5 
methods 10-84 

optimization phase (see Phase 0) 

OPTION statement 5 

origin of program messages 190 

OS (see operating system) 

OS/VS (see operating system) 

OSCL 89 

other techniques 192 
overlay load modules 97 
output 

buffer (see PPI index) 
size (see PPI index) 
overlay structure 97 
overview of 

load module interface 85 
MO diagrams 14 

conditional techniques sort/merge 75 
Blockset technique sort 25 
Peerage and Vale techniques sort 21 
program function 15 
program phases 4 
program structure 2 
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paged 172 
parameter list 

linkage editor 21 
PARM field parameters 19 
partitioning 33 
Peerage 90,91 

distribution sequence 33 
modules 91 
techniques 
phase structures 85 
when used 2 
Phase 0 104,89 

function 2 
Phase 1 89 

Phase 2 89 

Phase 3 91 

phase structures 85 
phase-to-phase information area 
(see PPI) 

physical characteristics of the program 
PL/I 5 

POLY 193-195,218 
PPI (phase-to-phase information 
area) 141 

creation of 21 
index 152 
map of 142 
names 228 
program 

exits (see exits) 
initiation 5 
methods 10-84 
organization 85-108 
phase 3 

physical characteristics 7 
reenteraoility 1 
structure 1 

Peerage Vale directory 111 

Peerage Vale directory list modules 111 

Peerage Vale module names 226 

Peerage Vale sorting application 224 

Peerage Vale techniques 168 

Peervale 172 

phase structures 90 

Phase 0 89 

Phase 1 89 

Phase 2 30 

Phase 3 91 

potential problems with invoking 
programs 16 

potential problems with routines 
at program exits 
PPI area 85 
PPI map 142 
program error 160 
program exit handling 85 
program exits 218 
program listing standards and 
conventions 226 
program organization 85 
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Q 


queue (see index queue) 
QSAM 1,71,83 


R 


record 

counter (see PPI index) 
record contents 161 
RECORD statement 5 
records 

contents 161 
fixed-length 

(see fixed-length records) 
number of (G) (see PPI index) 
spanned 

(see spanned records) 
variable-length 
(see variable-length records) 
reenterability 1 
re-IPL 165 
register 1 219 

register 13 219 

register 14 219 

register 15 219 

register usage 219 

registers used by peerage/vale techniques 165 
replacement-selection (see sorting 
technique) 

reporting a problem 163 
restart 224 

routines at program exits 160 
running modules, list of 112-119 


s 


sample set of messages 160 
segments 111 
SIZE 161 

SIZE operand (see PPI index) 
skip record count (see PPI index) 

SMF record DSECT 228.1 

SMF record type 16 30-31,58-59,89,91 

sort invoked via JCL 163 

sort uses registers 165 

sort/tnerge general register 219 

SORT 5 

blocking (see PPI index) 

SORT generation 7 
SORT phase (see phase 1) 

SORT statement 5 

SORTIN control blocks 166,169 

sorting application 

conventional techniques 2 
peerage vale 224 
sorting techniques 2 
SORTMODS 21,5 
SORTOUT 102 

SORTOUT control blocks 169,166 
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sortwk 102 

sortwk control blocks 166 
space 161 

specially formatted dump for sort 188 
start module in a dump 190 
start index 41 
structure of the program 1 
submitting an APAR 163 
submitting incident report 163 
symbols used in MO diagrams 10 
syntax 173 

of buffer (see PPI index) 
of data set (see also PPI index) 
of file (see PPI index) 

SYSABEND 127 
SYSIi.4 21,5 
SYSLIN 21 
SYSUDUMP 127 


T 


tables 

names 196 
tape 

devices 1 

taDle (see PPI index) 
tape sort techniques 2 
TaLPHlRN 71 
TBLPH2RN 79 
TBLPH3RN 83 

techniques all other 192 
trace records 178 
trace table 178 
transposing records 21 
tree updating 41 


u 


unit count table address (see PPI index) 
use of registers 160 
user exits (see exits) 
user routines 5 


V 


Vale 90 

Vale modules 93 
Vale technique 90 

distribution sequence 41 
phase structures 85 
when used 2 

variable-length records 221 
variable-length records 
completion codes 221 
format codes 223 
nodes 223 
tree structure 41 
VIO 19 
VLR-Blockset 

conditions for use 2.2 
directory of object modules 109 
load module interface 86.1 
modules 95 
VSAM 1,39,71,83 


WIOB control blocks 172 
work area names 226 
write chain 41 
writeback 51,53,59 
criteria for 51 
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Technical Newsletter 


This Newsletter No. 

Date 


LN20-9345 
31 March 19S1 


Base Publication No. 

File No. 


LY33-8042-6 
S370-33 (OS/VS) 


Prerequisite Newsletters LN20-9329 


OS/VS Sort/Merge Logic 

© Copyright IBM Corporation 1973, 1979 

This technical newsletter, a part of Release 5 of Program Number S740-SM1, provides replacement pages 
for the subject publication. These replacement pages remain in effect for any subsequent OS/VS releases 
unless specifically altered. Pages to be inserted and/or removed are: 


Cover — ix 

1 — 7 (2.1 and 2.2 added, 8 deleted) 

17-20 

23-32 

57-60 

67,68 

85 - 96 (86.1 and 94.1 added) 

109,110 
121 - 138 
157,158 
161,162 
171,172 
179 - 184 
189 - 192 
195,196 
203-218 

228.1 — back cover (228.1 and 228.2 added) 

Summary of Amendments 

Release 5 of 5740-SM1 provides improved performance, 3375 direct access storage device support, and 
usability enhancements. 

Note: Please file this cover letter at the back of the publication to provide a record of change. 
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Technical Newsletter 


This Newsletter No. 

Date 

Base Publication No. 

File No. 

Prerequisite Newsletters 


LN20-9390 
29 April 1982 

LY33-8042-6 
S370-33 (OS/VS) 

LN20-9329 (obsolete) 
LN20-9345 


OS/VS Sort/Merge Logic 
© Copyright IBM Corp. 1973,1979 

This technical newsletter, a part of Release 5, of OS/VS Sort/Merge, Program Product 
5740-SM1, provides replacement pages for the subject publication. These replacement pages 
remain in effect for any subsequent releases unless specifically altered. Pages to be inserted 
and/or removed are: 

cover, edition notice 

1 - 2.2 

Each technical change is marked by a vertical bar to the left of the change. 

Summary of Amendments 

This newsletter contains information about the IBM 3880 Models 2,3, and 13 Control Units. 
Note: Please file this cover letter at the back of the publication to provide a record of change. 
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